>899
while( my $n = 0+<$fh> ){
}