Opened by rosti at 2025-03-10 15:50
User since
2005-01-17
14826 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2005-01-17
14826 Artikel
Admin1
Beide Regexe fertig kompilieren.
Nur kurz hingetippt (ungetestet):
//EDIT: Copy un Paste-Fehler korrigiert, beim $re1 gehört das $ nach dem \E, beim $re2 braucht es kein \E.
Oder du nimmst für jedes Regex einen eigenen Match, wenn das zusammen gefasste (ja, manchmal mache ich es kurz und schlecht dokumentiert) zu unübersichtlich ist.
War es das, was du wissen wolltest?
Last edited: 2025-03-25 09:58:28 +0100 (CET)
Nur kurz hingetippt (ungetestet):
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
# <!-- parent=/index -->
my $re1 = qr(^\Q<!--\E\s?(\w+)=(.+)\s?\Q-->\E$);
# parent=/index
my $re2 = qr(^(\w+)=(.+)$);
if ( $string =~ m/${re1}|${re2}/ ) {
if ( length($1) and length($2) ) {
}
elsif ( length($3) and length($4) ) {
}
//EDIT: Copy un Paste-Fehler korrigiert, beim $re1 gehört das $ nach dem \E, beim $re2 braucht es kein \E.
Oder du nimmst für jedes Regex einen eigenen Match, wenn das zusammen gefasste (ja, manchmal mache ich es kurz und schlecht dokumentiert) zu unübersichtlich ist.
War es das, was du wissen wolltest?
Last edited: 2025-03-25 09:58:28 +0100 (CET)