Thread Reguläre Ausdrücke durch anderes ersetzten...
(59 answers)
Opened by ppm1 at 2004-02-16 23:16
[quote=Ronnie,18.02.2004, 15:31]
Code: (dl
)
&tuwas() if ($rein =~ m#[+|-|*|/]#); So in der Art?[/quote] Ich nehm mal an, Du meinst (?: ... ) statt [ ... ] ?! hmm weder auf diese noch auf die andere Weise wäre deine RE korrekt. 1) - hat Sonderbedeutung in [...] 2) in [...] braucht man kein |, es sei denn Du möchtest das Zeichen | mit in die Klasse aufnehmen (dann reicht aber eine Nennung) 3) Wenn Du doch (?: ... ) meinst, musst Du + escapen (also \+). Das könnte man ev. noch durch 4 Indexaufrufe beschleunigen.\n\n <!--EDIT|Crian|1077115551--> 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 |