CoffeeScript is beautiful

anagramma.coffee

fs = require 'fs'
_ = require 'underscore'

input = '/Users/simonwade/Downloads/wl.txt'
dictionary = fs.readFileSync(input).toString().split('\n')

anagram = (w)->
  anagrams = []
  chars = countChars w
  for word in _.filter dictionary, (word)-> word.length == w.length
    different = false
    for char, count of countChars word
      if chars[char] != count
        different = true
        break
    unless different
      anagrams.push word
  anagrams

countChars = (w)->
  chars = {}
  for i in [0..w.length]
    l = w[i]
    if chars[l] then chars[l]++ else chars[l] = 1
  chars

if word = process.argv[2]
  console.log anagram word
else
  console.log "Usage: #{process.argv[0]} {word}"