Thread Reguläre Ausdrücke durch anderes ersetzten...
(59 answers)
Opened by ppm1 at 2004-02-16 23:16
@eisbeer danke, aber Du testest jetzt immer auf diesem einen String. Für einen aussagefähigen Test muss man wissen, wie ungefähr die Daten desjenigen aussehen, der den Code einsetzt. Vielleicht hat er sehr viele sehr lange Texte, in denen diese Zeichen nicht vorkommen? Dann könnte das schon ganz anders aussehen.
Außerdem hat Strat ganz recht, ich hab ja auch schon darauf hingewiesen, dass man nur optimieren sollte, wenn es ein nachgewiesener Flaschenhals ist. 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 |