Opened by Robby at 2004-03-08 13:31
User since
2003-08-04
5866 Artikel
ModeratorIn
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
5866 Artikel
ModeratorIn
Ich dachte auch gleich an Eliza, nett, dass es das schon in Perl gibt.
(Gibt sie Ohrfeigen bei diesem frechen Ansinnen?)
(Gibt sie Ohrfeigen bei diesem frechen Ansinnen?)
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
use strict; use warnings; Link zu meiner Perlseite