1 # word occurrence listing
2 # usege: ruby occur.rb file..
3 freq = Hash.new(0)
4 while gets()
5 for word in $_.split(/\W+/)
6 freq[word] += 1
7 end
8 end
9
10 for word in freq.keys.sort!
11 print word, " -- ", freq[word], "\n"
12 end