while (<$fh>) { # ...