if ($somestring =~ /^(?=.*?u)(?=.*?i)(?=.*?o)(?=.*?a)(?=.*?e)/i) { print "$somestring contains all five vowels.\n"; }