while ($line ne ""){
        chomp($line);

##</code><code>##

while ( $line = <FILE> ) {
    chomp $line;
    next if $line eq "";
    #...... do your stuff here
} # end of while loop.