regexp will nicht so recht... - #112249 (Allgemeines zu Perl)

#Kein Kommentar

2008-07-17 16:20

User since
2007-06-09
575 Artikel
HausmeisterIn
[default_avatar]

das funktioniert bei mir ausgezeichnet:

Code: (dl )

my $string	= 'print "foo"';

$string =~ s/(print)\s*("\w+")/\$lang->$1($2, \$currentUser->lang() )/g;

print $string;

Gerade weil wir alle in einem Boot sitzen, sollten wir froh sein, dass nicht alle auf unserer Seite sind