$string =~ tr/AEIOUaeiou/aeiouAEIOU/;