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