Opened by jmb at 2006-02-13 10:08
User since
2003-08-04
5873 Artikel
ModeratorIn
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
5873 Artikel
ModeratorIn
Das klingt so sehr nach einem schon gelösten Problem, dass ich mal auf cpan schauen würde. selbst wenn du keine Module verwenden willst, kannst du ja vielleicht Techniken übernehmen.
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