Thread PerlPoint ...: ... wollte ich mal ausprobieren ... (60 answers)
Opened by steffenw at 2004-12-19 22:05

Crian
 2005-11-22 17:25
#50179 #50179
User since
2003-08-04
5873 Artikel
ModeratorIn
[Homepage]
user image
Nanu? Das haben wir doch schon fast ein Jahr lang geplant gehabt...
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

View full thread PerlPoint ...: ... wollte ich mal ausprobieren ...