Regulärer Ausdruck -> alles außer: Regulärer Ausdruck im Regulären Ausdruck (Seite 2) (Allgemeines zu Perl)

[thread]5935[/thread]

Regulärer Ausdruck -> alles außer: Regulärer Ausdruck im Regulären Ausdruck (Seite 2)

anti

2003-11-30 16:29

User since
2003-11-29
155 Artikel
BenutzerIn
[default_avatar]

@Crian: Sorry - deswegen hab ich doch geschrieben, das ich dachte, das ich sowas schon einmal probiert habe - wahrscheinlich habe ich da einen Fehler gemacht.
@pq: Mir ging es nicht darum HTML zu parsen (da dies ja dank der Hilfe funktioniert hatte), sondern nur darum, ob es prinzipiell möglich ist gematchte Ausdrücke zurückzugeben, da ich leider keine Ideen mehr hatte wie man soetwas machen könnte.
Zuviel Zeit habe ich leider nicht - ich dachte nur die Community kann mir helfen.

Falls es jemanden interessiert - ich habe es nun so gemacht:

Code: (dl )

print DATEIHANDLE $a =~ /REGULÄRERAUSDRUCK/g;

ciao\n\n

betterworld

2003-11-30 22:08

User since
2003-08-21
2614 Artikel
ModeratorIn

user image

[quote=anti,29.11.2003, 18:50]

Code: (dl )

$a =~ s/<a.+\/a>/ /g;

[/quote]
Man sollte beachten, dass .+ "greedy" ist. Daher wird es nicht beim ersten "/a>" beendet, sondern erst beim letzten. Beispiel:

Code: (dl )

undef $/;
$a = <DATA>;
$a =~ s/<a.+\/a>/ /g;
print $a;

Ueberschrift
<a ein link /a>
<a noch ein link /a>
Unterschrift

Ergebnis ist:
Ueberschrift

Unterschrift

Ein besseres Ergebnis koennte man z.B. erzielen, indem man .+ durch .+? ersetzt.\n\n

Lieblingsmodule: CPAN:

IPC::System::Simple, CPAN:

Path::Class

View all threads created 2003-11-29 19:23.