Opened by lichtkind at 2005-05-03 21:53
User since
2003-08-04
5873 Artikel
ModeratorIn
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
5873 Artikel
ModeratorIn
Ich glaub es wär mir auch schon zu mühsam, nur dafür ein weiteres Modul an allen Stellen installieren zu müssen. Es ist schade, dass Perl das nicht von sich aus so macht.\n\n
<!--EDIT|Crian|1115212015-->
<!--EDIT|Crian|1115212015-->
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