RDW #7 - Rätsel der Woche 7 - #49517 (Allgemeines zu Perl)

Crian

2004-08-23 16:52

User since
2003-08-04
5866 Artikel
ModeratorIn

[E|B
,22.08.2004, 18:54]Sicher, ich hab 3 abgegeben. (zwei lange und eine kurze Golflösung ;))

sind leider bisher nicht angekommen ...

[quote=Taulmarill,23.08.2004, 14:46]@Crain: ich hab eine lösung an beide E-Mail Addressen geschickt. evtl. noch im spam filter?[/quote]
die eine ist da, ich hab Dir doch auch geantwortet =)\n\n

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