Ausdrücke parsen, die \ enthalten - #78290 (Allgemeines zu Perl)

PerlProfi

2007-07-07 01:13

User since
2006-11-29
340 Artikel
BenutzerIn
[default_avatar]

Sieht für mich eher danach aus, als möchte er, dass der \ alle Zeichen innerhalb von Anführungsstrichen escaped, mir fällt leider nichts besseres ein, aber so würde ich es machen:

Code: (dl )

{
    my $escape = "\\";
    my $dood = sub { $a=pop;$a=~s/\Q$escape\E(.)/$1/g;$a };
    $string =~ s{(?<!\Q$escape\E)"(.*?)(?<!\Q$escape\E)"}{$dood->($1)}eg;
}

MfG