Sha256: e8784d4cec5460bb640e53a6157b7576c08f9b056c44809310b22e736b99fe67
Contents?: true
Size: 664 Bytes
Versions: 323
Compression:
Stored size: 664 Bytes
Contents
package Example;
use v5.10.1;
use strict;
use warnings;
sub translate {
my $original = shift;
my @pig_latin;
foreach my $orig ( split /\s+/ => $original ) {
given ($orig) {
when (/^[aeiou]/) { push @pig_latin => "${original}ay" }
when (/^y[^aeiou]/) { push @pig_latin => "${original}ay" }
when (/^x[^aeiou]/) { push @pig_latin => "${original}ay" }
when (/^([^aeiou]*qu)(.+)/) { push @pig_latin => "$2$1" . "ay" }
when (/^([^aeiou]+)(.+)/) { push @pig_latin => "$2$1" . "ay" }
}
}
return join " " => @pig_latin;
}
__PACKAGE__;
Version data entries
323 entries across 323 versions & 1 rubygems