Help for this page

Select Code to Download


  1. or download this
    map$j{join'',sort/./g}.=$_,sort<>;map{/^[^a]/&&print$'}sort map{(a..t)
+[s!$/(?=.)! !g].$_}%j
  2. or download this
    $o{_,sort/./g}=~s/.*/_$& $_/for sort<>;print/__ (.*
)/for sort%o