in reply to Finding vowels

From a quick one liner test the following works: 
print $word if $word=~ m/([aeiou].*){3}/i;

[download]

Replies are listed 'Best First'.
Re^2: Finding vowels
by Anonymous Monk on Jun 12, 2011 at 08:05 UTC
    Than you friend.it works!
[reply]

In Section Seekers of Perl Wisdom