Crunch: HTML-Mail zur TEXT-Mail konvertieren

Beitrag lesen

Hi again?

Sorry, mal wieder schneller gepostet als nachgedacht!

$content =~ s/(<[^<]+>)//g;
klappt schon, weil startendes < ja verboten

$content=~ s/(<.+?>)//gs;

Noch besser und vor allem sicherer wäre aber das HTML-Modul, in manchen Fällen ist der obere Ausdruck nämlich falsch (z.b. bei Javascripts und Kommentaren, die < od. > enthalten oder ähnlichem).
Daher:

use HTML::Parse;
use HTML::FormatText;
$text = HTML::FormatText->new->format(parse_html($content));

Grüße,
Crunch