home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / rbemx144.zip / ruby-1.4.4 / sample / freq.rb < prev    next >
Text File  |  1999-01-20  |  225b  |  14 lines
  1. # word occurrence listing
  2. # usege: ruby freq.rb file..
  3. freq = Hash.new(0)
  4. while gets
  5.   while sub!(/\w+/, '')
  6.     word = $&
  7.     freq[word] += 1
  8.   end
  9. end
  10.  
  11. for word in freq.keys.sort!
  12.   print word, " -- ", freq[word], "\n"
  13. end
  14.