Help for this page
my $value = qq(<html> <head> <title>HTML Document?</title> ... $value =~ s/<(([^ >]|\n|\s\w)*)>/ /gso; print $value;
$value =~ s{&}{&}gso; $value =~ s{"}{"}gso; $value =~ s{ }{ \ }gso; ... $value =~ s{\t}{ \ \ \ }gso; $value =~ s{\n}{<br>}gso; print $value;