while (defined($_ = <$fh>)) { ... }