Thread RegEx Editor: in Perl, via wxPerl, (45 answers)
Opened by pfuschi at 2004-08-01 19:05

pfuschi
 2004-08-05 04:12
#85149 #85149
User since
2004-03-31
198 Artikel
BenutzerIn
[default_avatar]
Servus,
eigentlich dürfte das kein Problem sein da das via eval gemacht wird und errors eigentlich abgefangen werden
Code (perl): (dl )
1
2
3
        my $okay = 1;
        eval {m/$regex/;};
        $okay =0 if $@;

Das dient dazu um Syntaxfehler in der RegEx nicht an das Programm ran zulassen und frühzeitig genug zu erkennen. Später wird die regex zum matchen nochmal ausgeführt... ohne eval. aber nur wenn $okay == 1 ist evtl. sollte ich das dann auch in ein eval packen ... zur Sicherheit
Und du hast recht ... es wird bei jeder Änderung gecheckt, was ich eigentlich beibehalten will, aber zum testen kann man das mal machen.
Es aht aber den Vorteil dass das Proggi von vorneherein darauf ausgelegt ist alle Falschen RegExes zu verkraften da ja auch bei jeder Änderung der check gemacht wird. Eigentlich hatte ich mir dadurch erhofft stabiler zu sein weil ja beim eintragen einer RegEx dann automatisch Testcases entstehen.

greetz & fetten Segen
manu
PCE - Editor für Perl in Perl
Bookzilla.de - Mit jedem Kauf OpenSource unterstützen
"I know I can't hold the hate inside my mind
cause what consumes your thoughts controls your life"
- Creed

View full thread RegEx Editor: in Perl, via wxPerl,