I wrote this snippet ~10 years ago when learning Perl:

  for(<>){chop;$s{join'',sort split'',lc}.=" $_"}for(sort%s){/. /&&print"$_\n"}

Running against wordlist.txt was fun (anemic cinema, bedroom boredom, etc.)