Return Styles: Pseud0ch, Terminal, Valhalla, NES, Geocities, Blue Moon. Entire thread

Perl Question on Pattern Matching

Name: Anonymous 2011-06-03 19:08

Okay this simple thing matches words that has an a e i o u, but how do I make it so that it matches it in the specific order for a e i o u

Example abstemious

foreach $v(@lines)
{
    if(($v =~ /a/) && ($v =~ /e/) && ($v =~ /i/) && ($v =~ /o/) && ($v =~ /u/))
    {
        print $v;
    }
}

Name: Code Less, Create More 2011-06-03 19:18

Lisp

lines | map {V:[@_ {\a;\e;\i;\o;\u} @_] -> say V}


Perl

foreach $v(@lines)
{
    if(($v =~ /a/) && ($v =~ /e/) && ($v =~ /i/) && ($v =~ /o/) && ($v =~ /u/))
    {
        print $v;
    }
}

Newer Posts
Don't change these.
Name: Email:
Entire Thread Thread List