$_ = 'thYn. PYehlnohlrne.kchla'; $salt = 'P arctehYkl.no|on.lkYhetcra P';
eval "tr|$salt|"; print;