in reply to Re: Extracting Text Lines
in thread Extracting Text Lines

my $line = <FILE>; # read the next line print $line;
I think these two lines are only needed because you want to provide a scalar context to <FILE>. That can be done easier and more efficiently (and probably more readable as well):
print scalar <FILE>; # read the next line and print it
Liz