Thread /String+/ ersetzen mit String2 für alle /String+/
(11 answers)
Opened by PerlProfi at 2006-12-03 19:54
Du solltest $& durch $1 ersetzen und im "suchteil" die matches einsammeln. Also
Code: (dl
)
$str =~ s|((?:\$r->vor;?\n?){2,})|'vor('. @{[split(/;\n?/,$1)]} .");\n"|esg; Das $& sollte man vermeiden, weil es den Regulären Ausdruck ausbremst (siehe perlvar). Edit: Das scalar brauchst Du nicht, weil bei der Konkatenation sowieso Skalarer Kontext ist.\n\n <!--EDIT|renee|1165221383--> OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/) -- Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html Perl-Entwicklung: http://perl-services.de/ |