Bonus points for guessing the cliche phrase I tested this with. <grin>
cheers,#!/usr/bin/perl -w use strict; while(<>) { s{ \b(qu|[bcdfghjklmpnrstvwxyz]*)([aeiou]+)(\w*) } { if($1) {$2.$3.$1.'ay'} else {$2.$3."way"} }egix; print; } # END
In reply to RE: (2) Pig Latin (another smidge closer)
by ybiC
in thread Pig Latin
by vroom
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |