while (<FOO>){

##</code><code>##

while (defined($_ = <FOO>)){