find anagrams by konn

import List
main=do{w<-getLine;c<-getContents;putStr$unlines[t|t<-lines c,sort t==sort w]}

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return top