Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

Perl Golf (was RE: (Ovid) RE: Pig Latin)

by japhy (Canon)
on Jul 23, 2000 at 23:12 UTC ( #23996=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    # updated (5 years later!)
    s/\b(qu|[^\W0-9aeiou_]+)?([a-z]+)/$1?"$2$1ay":"$2way"/ieg;