$line = <FILE>; # reads one line from FILE;
@lines = <FILE>; # slurps up the whole thing.
for $line (<FILE>) ... # which of the above applies?