Opened by Crian at 2005-02-17 16:42
User since
2003-08-04
5873 Artikel
ModeratorIn
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
5873 Artikel
ModeratorIn
Nein, das Programm dürfte dann mit einem Fehler abbrechen. Besser Du testetst beim Kopieren einfach mit exists nach, ob der Schlüssel da ist (ggf. vorher leer anlegen). Oder Du benutzt es in einem eval-Statement.
s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;
use strict; use warnings; Link zu meiner Perlseite
use strict; use warnings; Link zu meiner Perlseite