my $count= ()= <$fh>;