while (<>) {
    print "blank line detected\n" if /^\s*$/;
}