in reply to How do I test for a blank line when reading from a file?

If by "blank" you mean "empty", then /^$/, as in: 
while (<>) {
    print "blank line detected\n" if /^$/;
}

[download]

In Section Seekers of Perl Wisdom