for (1..100) { <$fh>; }