Opened by Humbert at 2009-08-27 17:23
User since
2003-08-04
12208 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
12208 Artikel
Admin1
wie die anderen schon gesagt haben und ich auch impliziert hatte, kannst du es mit einer schleife lösen.
wenn du aber lust auf ein bisschen regex-foo hast:
hier wird in dem ersetzungsteil perl ausgeführt.
wenn du aber lust auf ein bisschen regex-foo hast:
Code (perl): (dl
)
1 2 3 4 5 6 7 8
$s = "foo img123 bar img456 baz img789 boo"; my $c = 0; my $max = 2; $s =~ s/(img)(\d+)/++$c > $max ? "$1$2" : qq{<img src="$2">}/eg; print $s; __END__ Ausgabe: foo <img src="123"> bar <img src="456"> baz img789 boo
hier wird in dem ersetzungsteil perl ausgeführt.
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem