$str =~ tr/[]//d;