1998-01-16 12:13:05 +00:00
|
|
|
# word occurrence listing
|
|
|
|
# usege: ruby occur2.rb file..
|
|
|
|
freq = {}
|
|
|
|
while gets()
|
2002-12-19 20:56:37 +00:00
|
|
|
for word in split(/\W+/)
|
1998-01-16 12:13:05 +00:00
|
|
|
begin
|
2002-12-19 20:56:37 +00:00
|
|
|
freq[word] += 1
|
2000-10-02 07:48:42 +00:00
|
|
|
rescue NameError
|
1998-01-16 12:13:05 +00:00
|
|
|
freq[word] = 1
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
for word in freq.keys.sort
|
|
|
|
printf("%s -- %d\n", word, freq[word])
|
|
|
|
end
|