regex img tag ersetzen - #67735 (Allgemeines zu Perl)

mordur

2003-10-27 12:48

User since
2003-09-25
182 Artikel
BenutzerIn

ich möchte mit folgendem Quelltext den Bildtag aus dem Html löschen.

Code: (dl )

#!/usr/bin/perl
$text="<html><head></head><body><table><tr><td><a href=\"doof.seite\"><img src=\"as.bild\"><br>Hier klicken</a></td></tr></table></body></html>";
print $text,"\n";
$text=~s/<img (.+)>//g;
print $text,"\n";

Nur leider schneidet er alles ab dem Bildtag weg so das nach dem ersetzen nur noch bis zum link ausgegeben wird! Warum?