eval "tr/\Q$oldlist\E/\Q$newlist\E/";