Nice! This technique is a winner at 53 chars:

+{map$x-reverse($x=$_.$_*$_.$_)?():($_,$_*$_),1..pop}
[download]

   MeowChow                                   
               s aamecha.s a..a\u$&owag.print