$string =~ tr/%()*//d;