fork download
  1. import Data.List
  2. import Data.Function
  3. main = getLine >>= mapM_ print . groupBy ((==) `on` sort) . sortBy (compare `on` sort) . words
Success #stdin #stdout 0s 6252KB
stdin
asdf xyu uuu uyx yux fdsa
stdout
["asdf","fdsa"]
["uuu"]
["xyu","uyx","yux"]