Zeichen auf Skala verschieben: hin und zurück - will nicht - #52145 (Allgemeines zu Perl)

pktm

2005-02-25 17:09

User since
2003-08-07
2921 Artikel
BenutzerIn

Hallo!

Ich möchte die Cäsar-Verschlüsselung propgrammieren, bei der ein Zeichen durch verschiebung im Alphabet codiert wird.
Als Alphabet möchte ich erstmal den Skalar von Perl nehmen :)
Das sieht dann so aus:

Code: (dl )

1
2
3

my $verschiebung = 1;
my $z = 'a';
my $nz = chr((ord($z)+$verschiebung));

Wenn ich da jetzt ein

Code: (dl )

$verschiebung *= -1;

dazu nehme um die Verschiebung in umgekehrter Richtung vorzunehmen will das aber nicht funktionieren.
Wo aber bitte ist mein Fehler? Bei negativer Verschiebung wird der Wert auf der Zeichenskala doch runtergezählt (4+-1 = 3?).

mfg pktm

http://www.intergastro-service.de (mein erstes CMS :) )