kata6.scala

import scala.collection.mutable.{Map => MutableMap}
import scala.io.Source

class AnagramMap {
  
  protected val anagrams = MutableMap.empty[String, Set[String]]
  
  def add(word: String) {
    val normalised = normalise(word.toLowerCase)
    val equivalents = anagrams.getOrElseUpdate(normalised, Set.empty[String])
    anagrams(normalised) = equivalents + word.toLowerCase
  }
  
  def getAnagrams = anagrams.values filter { _.size > 1 } toList
  
  protected def normalise(word: String) = word.toList sort {_<_} mkString
  
}

val a = new AnagramMap
for (line <- Source.fromFile("/usr/share/dict/words").getLines)
  a add line.trim
val anagrams = a.getAnagrams
anagrams map { _ mkString ", " } foreach println
println("Found "+anagrams.length+" sets of anagrams")