while (<$fh>) { .. }