RDW #8 - Rätsel der Woche 8 - #49657 (Allgemeines zu Perl)

Crian

2004-08-30 11:31

User since
2003-08-04
5870 Artikel
ModeratorIn

Hmm schade, dass sich sri nicht geäußert hat. Wenn Du wirklich der einzige bist DS, dann werd ich sri nochmal bitten das genauer zu spezifizieren und wir bringen die Aufgabe dann einfach nochmal. Dann hast Du Startvorteile ;)

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