Opened by kabel at 2004-07-03 10:32
User since
2003-08-04
5873 Artikel
ModeratorIn
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
5873 Artikel
ModeratorIn
Sieht sehr gut aus, den werd ich zu Hause mal ausprobieren. Sowas wollte ich immer schonmal haben, aber der Leidensdruck war nie groß genug, es selbst zu schreiben.
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