if (lc($_) =~ y/aeiou// == 1) {