http://www.perlmonks.org?node_id=921009


in reply to Re: Another regex to solve ...
in thread Another regex to solve ...

Hi, AR -

Thanks for your proposal ... but that's not precisely what I wanted ... I do want words like 'feap' to pass ... only words in which the same vowel is duplicated before the 'p' should be filtered out. Sorry for not making this perfectly clear right from the start.

Any alternative suggestions from your side then?

Cheers -

Pat

Replies are listed 'Best First'.
Re^3: Another regex to solve ...
by AR (Friar) on Aug 18, 2011 at 16:46 UTC
    /((\b|[^aeiou])[aeiou]|[eiou]a|[aiou]e|[aeou]i|[aeiu]o|[aeio]u)p\b/

    but it's not even remotely elegant. I'll keep working on it.

      Hm ... yes, of course ... the explicit disjunction would work. I guess we both agree on the elegance of this solution (or lack thereof) ;-)

      Thanks for posting it, nonetheless!

        Two regexes work:

        $w =~ /([aeiou])p\b/ && $w !~ /${1}${1}p\b/