in reply to Another regex to solve ...
my @tests = qw/ p up hip hop hoop heap help hops /; for ( @tests ) { say if reverse =~ /^p([aeiou])(?!\1)/; }
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: Another regex to solve ...
by pat_mc (Pilgrim) on Aug 19, 2011 at 19:44 UTC |
In Section
Seekers of Perl Wisdom