in reply to Blow off blank line and lines with messages

Your regex only skips lines that have "" messages. If you want to skip blank lines, add  next if $line =~ /^\s*$/;

The chomp will remove the newline of a blankline, but leave the line itself. (You aren't doing anything with any of the lines here, so I'm assuming you're showing simplified code)

Besides, a "blank line" may be one that has spaces in it.