Thread substr_count in perl
(29 answers)
Opened by norman at 2004-07-14 14:52
Ich hab das Programm genau so abgeschickt wie es da steht, allerdings aus Komodo heraus. Keine Ahnung, ob der da noch -w setzt.
Wichtig ist, dass nicht der erste, sondern der letzte Wert dabei rauskommt. Lies mein Posting oben nochmal, ich hab zuende ausgeführt, was ich meinte.\n\n <!--EDIT|Crian|1089814627--> 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 |