Opened by Gast at 2003-11-29 19:23
User since
2003-08-21
2614 Artikel
ModeratorIn
2003-08-21
2614 Artikel
ModeratorIn
[quote=anti,29.11.2003, 18:50]
[/quote]
Man sollte beachten, dass .+ "greedy" ist. Daher wird es nicht beim ersten "/a>" beendet, sondern erst beim letzten. Beispiel:
Ergebnis ist:
Ueberschrift
Unterschrift
Ein besseres Ergebnis koennte man z.B. erzielen, indem man .+ durch .+? ersetzt.\n\n
<!--EDIT|betterworld|1070222995-->
Code: (dl
)
$a =~ s/<a.+\/a>/ /g;
Man sollte beachten, dass .+ "greedy" ist. Daher wird es nicht beim ersten "/a>" beendet, sondern erst beim letzten. Beispiel:
Code: (dl
)
1
2
3
4
5
6
7
8
9
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
<!--EDIT|betterworld|1070222995-->
Lieblingsmodule: 
IPC::System::Simple, Path::Class
IPC::System::Simple, Path::Class