Opened by Froschpopo at 2008-04-13 18:34
User since
2003-08-15
2653 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-08-15
2653 Artikel
BenutzerIn
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
13: # entweder so:
14: my $t=$text;
15: for my $key (keys(%tags))
16: {
17: $t=~s|\[$key\](.+?)\[/$key\]|sprintf($tags{$key},$1)|egs;
18: }
19: print "$t\n";
20:
21: #oder so:
22: $t=$text;
23: $t=~s|\[([^\[\]\W]+)\](.+?)\[/\1]|replace($1,$2)|egs;
24: print "$t\n";
25:
26: sub replace
27: { return sprintf($tags{shift(@_)},shift(@_)) }
Welcher der beiden regexe ist eigentlich performanter bzw. empfehlenswerter?
Der zweite zeigt ja leider keine nicht-existierenden Tags an (z.b. [test] ).
Optisch gefällt mir der zweite deutlich besser, aber irgendwie vermute ich, dass der erste schneller ist. Kann das jemand bestätigen?