in reply to Code does Remove Html
my $value = qq(<html> <head> <title>HTML Document?</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1 +"> </head> <body bgcolor="#FFFFFF" text="#000000"> Some Text. <img src="/super/long/path/string/that/the/author/puts/on/a/separate/line. +jpg" alt="missing image" > </body> </html>); $value =~ s/<(([^ >]|\n|\s\w)*)>/ /gso; print $value;
$value =~ s{&}{&}gso; $value =~ s{"}{"}gso; $value =~ s{ }{ \ }gso; $value =~ s{<}{<}gso; $value =~ s{>}{>}gso; $value =~ s{\)}{)}gso; $value =~ s{\(}{(}gso; $value =~ s{\t}{ \ \ \ }gso; $value =~ s{\n}{<br>}gso; print $value;
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Code does Remove Html (hole)
by tye (Sage) on Dec 17, 2006 at 16:07 UTC | |
by SFLEX (Chaplain) on Dec 17, 2006 at 17:40 UTC |