Mit Perl den ASCII-Wert eines Zeichens ändern

[Bernhard Peissl]

Hallo

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

viel zu statisch, besser so in der Richtung:
$string =~ s/(.)/chr(ord($1)-5)/eg;

mag sein, aber verstehen, wenn man bei regexpr. das überhaupt sagen kann ;-) tut man cheatahs Version am ehesten! Bei deiner steigt jeder nicht-auch-nur-halbwegs-perl-Profi wie ich leider voll aus :-(

Dazu müsste man erst mal wissen, was (.) matcht (Irgendein einzelnes Zeichen?)
und was in $1 drinnenliegt (der gematchte Asudruck??)

... dann könnte ich mir daraus einen halbwegs sinnvollen ;-) Reim machen!

Übrigens, an welcher Ascii-Tabelle orientiert sich Perl, wenn man chr(xxx) aufruft? Da sind ja die Zeichenbelegungen ziemlich unterschiedlich, zumindest bei den Sonderzeichen! Gibts da einen Standardzeichensatz?

liebe Grüsse und,
keep it simple ;-)
Bernhard