gistfile1.txt

  def anagram
    word_groups = self.chars.permutation.map(&:join).uniq.group_by(&:chr)
    word_groups.map do |letter, words|
      $search_dictionary[letter] & words
    end.flatten.compact - [self]
    keys = []
    word_groups.each {|key, value| keys.push(key)}
    y = keys.length
    y.times do |n|
      p word_groups[keys[n]] & $search_dictionary[keys[n]]
    end
  end