NAME<\/a> HTML::Filter \u2212 Filter HTML text through the parser<\/p>\n This module is deprecated.<\/b> The “HTML::Parser” now provides the functionally of “HTML::Filter” much more efficiently with the “default” handler.<\/p>\n require HTML::Filter; “HTML::Filter” is an HTML<\/small> parser that by default prints the original text of each HTML<\/small> element (a slow version of cat<\/b>(1) basically). The callback methods may be overridden to modify the filtering for some HTML<\/small> elements and you can override output()<\/b> method which is called to print the HTML<\/small> text.<\/p>\n “HTML::Filter” is a subclass of “HTML::Parser”. This means that the document should be given to the parser by calling the $p\u2212>parse()<\/b> or $p\u2212>parse_file()<\/b> methods.<\/p>\n The first example is a filter that will remove all comments from an HTML<\/small> file. This is achieved by simply overriding the comment method to do nothing.<\/p>\n package CommentStripper; The second example shows a filter that will remove any < TABLE<\/small> >s found in the HTML<\/small> file. We specialize the start()<\/b> and end()<\/b> methods to count table tags and then make output not happen when inside a table.<\/p>\n package TableStripper; If you want to collect the parsed text internally you might want to do something like this:<\/p>\n package FilterIntoString; HTML::Parser<\/p>\n Copyright 1997\u22121999 Gisle Aas.<\/p>\n This library is free software; you can redistribute it and\/or modify it under the same terms as Perl itself.<\/p>\n HTML::Filter \u2212 Filter HTML text through the parser <\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[1],"tags":[3496,3007],"class_list":["post-7161","post","type-post","status-publish","format-standard","hentry","category-sin-categoria","tag-htmlfilter","tag-man3"],"gutentor_comment":0,"_links":{"self":[{"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/posts\/7161","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/comments?post=7161"}],"version-history":[{"count":0,"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/posts\/7161\/revisions"}],"wp:attachment":[{"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/media?parent=7161"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/categories?post=7161"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/tags?post=7161"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}
NOTE<\/a>
SYNOPSIS<\/a>
DESCRIPTION<\/a>
EXAMPLES<\/a>
SEE ALSO<\/a>
COPYRIGHT<\/a> <\/p>\n
\nNAME <\/a> <\/h2>\n
NOTE <\/a> <\/h2>\n
SYNOPSIS <\/a> <\/h2>\n
$p = HTML::Filter\u2212>new\u2212>parse_file(“index.html”);<\/p>\nDESCRIPTION <\/a> <\/h2>\n
EXAMPLES <\/a> <\/h2>\n
require HTML::Filter;
@ISA=qw(HTML::Filter);
sub comment { } # ignore comments<\/p>\n
require HTML::Filter;
@ISA=qw(HTML::Filter);
sub start
{
my $self = shift;
$self\u2212>{table_seen}++ if $_[0] eq “table”;
$self\u2212>SUPER::start(@_);
}
sub end
{
my $self = shift;
$self\u2212>SUPER::end(@_);
$self\u2212>{table_seen}\u2212\u2212 if $_[0] eq “table”;
}
sub output
{
my $self = shift;
unless ($self\u2212>{table_seen}) {
$self\u2212>SUPER::output(@_);
}
}<\/p>\n
require HTML::Filter;
@ISA=qw(HTML::Filter);
sub output { push(@{$_[0]\u2212>{fhtml}}, $_[1]) }
sub filtered_html { join(“”, @{$_[0]\u2212>{fhtml}}) }<\/p>\nSEE ALSO <\/a> <\/h2>\n
COPYRIGHT <\/a> <\/h2>\n
\n","protected":false},"excerpt":{"rendered":"