Mit Perl den ASCII-Wert eines Zeichens ändern

[Christian Kruse]

Hi,

$string =~ s/A/chr(60)/eg;

viel zu statisch, besser so in der Richtung:

$string =~ s/(.)/chr(ord($1)-5)/eg;

mfg
CK1