Thread Perl/tk, bind bei Textwidgets, html in widgets
(12 answers)
Opened by Frühstücker at 2004-01-15 11:21
Ich hab schon eine Idee und werde mal etwas basteln ... ist das Array mit den Dateinamen fest?
Ich gehe mal davon aus... ...wenns nicht gefällt, können wir es ja abändern... 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 |