Sparen Sie Abgestimmt Perl-Regex-Variable

Habe ich ein einfaches Perl-regex, die ich brauche, zu retten, als eine variable.

Wenn ich es ausdrucken:

print($html_data  =~ m/<iframe id="pdfDocument" src=.(.*)pdf/g);

Er druckt, was ich will, um zu sparen, aber wenn man versucht, es zu retten mit:

$link = $html_data =~ m/<iframe id="pdfDocument" src=.(.*)pdf/g;

Bekomme ich wieder eine '1' als der Wert der $link. Ich nehme an, dies ist, weil es gefunden - '1' entsprechen. Aber wie Speichere ich den Inhalt der match statt?

InformationsquelleAutor chrstahl89 | 2012-04-11
  1. 4

    Den übereinstimmenden Teilausdrücke von einem Muster sind gespeichert in der Variablen $1, $2 usw. Sie können auch das gesamte aufeinander abgestimmte Muster ($&) aber das ist teuer und sollte vermieden werden.

    Den Unterschied im Verhalten hier, durch die Art und Weise, ist das Ergebnis von skalaren vs. Liste Kontext; Sie sollten Sie kennenlernen, wie Sie sich unterscheiden, und wie Sie Einfluss auf das Verhalten der verschiedenen Perl-Ausdrücke.

    • Verwenden Sie nicht $&. Es verlangsamt jeden regex nicht erfasst in Ihrem gesamten Programm. Nein, das hat sich nicht geändert in den neueren Perl-version, so dass ich gelöscht, die etwas aus Ihrem post. Wenn Sie wollen, dass etwas nicht haben, der Nachteil ist, verwenden Sie /p und ${^MATCH}. Siehe perlvar für die Dokumentation für diese Variablen.
    InformationsquelleAutor geekosaur
  2. 6

    Hinweis: die /g, um alle Spiele. Die können doch unmöglich in einen Skalar. Benötigen Sie ein array.

    my @links = $html_data =~ m/<iframe id="pdfDocument" src=.(.*)pdf/g;

    Wenn Sie wollen einfach nur das erste match:

    my ($link) = $html_data =~ m/<iframe id="pdfDocument" src=.(.*)pdf/;

    Hinweis: die Klammern (und die fehlen jetzt-nutzlos /g). Man braucht Sie zum call m//in Listen-Kontext.

    • Die /g im skalaren Kontext wird nur gut, wenn Sie versuchen, das gleiche zu tun, was Sie tut. Sie brauchen es nicht aus, um die Liste der Aufnahmen aber.
    • d foy, ich habe nicht gesagt, /g im skalaren Kontext ist das nicht sinnvoll. Ich hatte noch nicht einmal sagen, es war nicht hilfreich hier. Ich sagte skalarer Kontext ist das nicht sinnvoll hier. (Obwohl es kann noch getan werden im skalaren Kontext: my $link = $html_data =~ m/.../ ? $1 : undef;)
    InformationsquelleAutor ikegami
  3. 0

    Vom 'perlfunc' docs:

    LISTE drucken

    Druckt einen string oder eine Liste von strings.

    So,print m//, wo die m//legt fest, dass der Rückgabewert

    wollte (wantarray?) ist eine Liste

    (Es appers m//ohne capture-Gruppen gibt 1 oder 0 entsprechen, pass

    oder scheitern, wo Sie als m//g liefert eine Liste von Treffern).

    und

    $link = m//können nur Skalare (im Gegensatz zu list) Kontext.

    So, m//liefert match-Ergebnisse 1 (wahr) oder 0 (false).

    InformationsquelleAutor
  4. 0

    Schrieb ich einfach einen code wie diesen. Es kann helfen. Es ist im Grunde so wie Euch außer mir hat noch ein paar mehr Klammern.

    my $path = `ls -l -d ~/`;
#print "\n path is $path";
($user) = ($path=~/\.*\s+(\w+)\susers/);

    So dass Ihnen aus diesem Beispiel kann so etwas sein, wenn Ihr versucht zu speichern, die ganze Sache? Ich bin mir nicht sicher, aber können Sie mir ein Beispiel. Ich bin zu speichern, was in (\w+):

    ($link) = ($html_data =~ (m/<iframe id="pdfDocument" src=.(.*)pdf/g));
    InformationsquelleAutor jennifer
Schreibe einen Kommentar