RDW #3 - Rätsel der Woche Nr. 3 - #84834 (Allgemeines zu Perl)

Crian

2004-07-23 23:14

User since
2003-08-04
5866 Artikel
ModeratorIn

So, ich habe folgende Dateien auf unseren Server geladen:

http://www.perl-community.de/rdw/rdw03/rdw03.txt (Aufgabentext)
http://www.perl-community.de/rdw/rdw03/rdw03_beispiel.txt (Blindtext)
http://www.perl-community.de/rdw/rdw03/hexdump.png (Test-Bild)
http://www.perl-community.de/rdw/rdw03/hexdump.txt (Esskars Ergebnis zumTest-Bild)

Außerdem noch ein paar Testdateien, die ev. auf Probleme / Verschönerungswünsche hinweisen können:

http://www.perl-community.de/rdw/rdw03/umbruchtest.txt
http://www.perl-community.de/rdw/rdw03/8zeichen.txt

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