Aside from the methods already given, you may also want to take a look at perlrun's section on the -s switch, which is nice for quick hacks.

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