1998-01-16 12:13:05 +00:00
|
|
|
# word occurrence listing
|
|
|
|
# usege: ruby occur.rb file..
|
1999-01-20 04:59:39 +00:00
|
|
|
freq = Hash.new(0)
|
1998-01-16 12:13:05 +00:00
|
|
|
while gets()
|
2002-12-19 20:45:24 +00:00
|
|
|
for word in split(/\W+/)
|
1999-01-20 04:59:39 +00:00
|
|
|
freq[word] += 1
|
1998-01-16 12:13:05 +00:00
|
|
|
end
|
|
|
|
end
|
|
|
|
|
1999-01-20 04:59:39 +00:00
|
|
|
for word in freq.keys.sort!
|
|
|
|
print word, " -- ", freq[word], "\n"
|
1998-01-16 12:13:05 +00:00
|
|
|
end
|