chomp (my @words = <$fh>);