If you just want to delete them:

$string =~ s/[$oldchars]//g
[download]

If you want to replace them:

eval "\$string =~ tr/$oldchars/$newchars/"
[download]

In both cases you might need to escape something if there are meta characters, for example with quotemeta for the regex.