http://qs321.pair.com?node_id=1018538


in reply to compute the occurrence of words

Please explain what the line $data=<FH> does and why it is there?

Secondly, why would you want to enumerate occurrences of unique things in any other way than as a hash?

You're new to Perl and so it seems an odd data type, but once you get used to using them hashes are a phenomenally useful tool.

print "Good ",qw(night morning afternoon evening)[(localtime)[2]/6]," fellow monks."