Thread Grundsatz für den Aufbau einer Perl-Funktion
(14 answers)
Opened by jan999 at 2009-04-20 09:22 2009-04-22T06:17:41 jan999 Du hast noch nie von einem HoA gehört? Code: (dl
)
1 my %hash = ( Last edited: 2009-04-22 12:11:45 +0200 (CEST) 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 |