Как найти слова с теми же буквами с помощью сценария оболочки

Представленный без комментария:

ruby -rset -e '
  readlines.each {|sentence| 
    p sentence
    data = Hash.new {|h,k| h[k] = Set.new}
    sentence.scan(/\w+/).each {|word| data[word.chars.sort] << word }
    p data.each_value.select {|set| set.size > 1}.collect(&:to_a)
  }
' << END
How can you listen if you are not silent?
I saw a tap; it was apt
END

"How can you listen if you are not silent?\n"
[["listen", "silent"]]
"I saw a tap; it was apt\n"
[["saw", "was"], ["tap", "apt"]]

Это перечислит частоту каждого разграниченного пространством набора символов в предложении:

echo 'How can you listen if you are not silent?' \
| tr -cd '[:alpha:][:space:]' \
| tr '[:upper:][:space:]' '[:lower:]\n' \
| while read a; do grep -o .<<<$a | sort | tr -d '\n'; echo; done \
| sort | uniq -c | sort

Вывод:

  1 acn
  1 aer
  1 fi
  1 how
  1 not
  2 eilnst
  2 ouy

Это не очень изящно, и вероятно необходимо использовать что-то еще, чем оболочка.