GwenDragon+2008-08-05 15:52:11--

Code: (dl )

map { $string=~s/$_/$r{$_}/eg; } keys %r;

der e-modifier ist hier völlig überflüssig...