<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">package HTML::Parse;

use 5.008;

#ABSTRACT: Deprecated, a wrapper around HTML::TreeBuilder


use warnings;
use strict;

our $VERSION = '5.03'; # VERSION from OurPkgVersion

use vars qw(@ISA @EXPORT
    $IMPLICIT_TAGS $IGNORE_UNKNOWN $IGNORE_TEXT $WARN
);

require Exporter;
@ISA    = qw(Exporter);
@EXPORT = qw(parse_html parse_htmlfile);

# Backwards compatability
$IMPLICIT_TAGS  = 1;
$IGNORE_UNKNOWN = 1;
$IGNORE_TEXT    = 0;
$WARN           = 0;

require HTML::TreeBuilder;

sub parse_html {
    my $p = $_[1];
    $p = _new_tree_maker() unless $p;
    $p-&gt;parse( $_[0] );
}

sub parse_htmlfile {
    my ( $file, $p ) = @_;
    my ($HTML);
    open( $HTML, "&lt;", $file ) or return;
    $p = _new_tree_maker() unless $p;
    $p-&gt;parse_file($HTML);
}

sub _new_tree_maker {
    my $p = HTML::TreeBuilder-&gt;new(
        implicit_tags  =&gt; $IMPLICIT_TAGS,
        ignore_unknown =&gt; $IGNORE_UNKNOWN,
        ignore_text    =&gt; $IGNORE_TEXT,
        'warn'         =&gt; $WARN,
    );
    $p-&gt;strict_comment(1);
    $p;
}

1;

__END__

=pod

=head1 NAME

HTML::Parse - Deprecated, a wrapper around HTML::TreeBuilder

=head1 VERSION

This document describes version 5.03 of
HTML::Parse, released September 22, 2012
as part of L&lt;HTML-Tree|HTML::Tree&gt;.

=head1 SYNOPSIS

  See the documentation for HTML::TreeBuilder

=head1 DESCRIPTION

Disclaimer: This module is provided only for backwards compatibility
with earlier versions of this library.  New code should I&lt;not&gt; use
this module, and should really use the HTML::Parser and
HTML::TreeBuilder modules directly, instead.

The C&lt;HTML::Parse&gt; module provides functions to parse HTML documents.
There are two functions exported by this module:

=over 4

=item parse_html($html) or parse_html($html, $obj)

This function is really just a synonym for $obj-&gt;parse($html) and $obj
is assumed to be a subclass of C&lt;HTML::Parser&gt;.  Refer to
L&lt;HTML::Parser&gt; for more documentation.

If $obj is not specified, the $obj will default to an internally
created new C&lt;HTML::TreeBuilder&gt; object configured with strict_comment()
turned on.  That class implements a parser that builds (and is) a HTML
syntax tree with HTML::Element objects as nodes.

The return value from parse_html() is $obj.

=item parse_htmlfile($file, [$obj])

Same as parse_html(), but pulls the HTML to parse, from the named file.

Returns C&lt;undef&gt; if the file could not be opened, or $obj otherwise.

=back

When a C&lt;HTML::TreeBuilder&gt; object is created, the following variables
control how parsing takes place:

=over 4

=item $HTML::Parse::IMPLICIT_TAGS

Setting this variable to true will instruct the parser to try to
deduce implicit elements and implicit end tags.  If this variable is
false you get a parse tree that just reflects the text as it stands.
Might be useful for quick &amp; dirty parsing.  Default is true.

Implicit elements have the implicit() attribute set.

=item $HTML::Parse::IGNORE_UNKNOWN

This variable contols whether unknow tags should be represented as
elements in the parse tree.  Default is true.

=item $HTML::Parse::IGNORE_TEXT

Do not represent the text content of elements.  This saves space if
all you want is to examine the structure of the document.  Default is
false.

=item $HTML::Parse::WARN

Call warn() with an appropriate message for syntax errors.  Default is
false.

=back

=head1 REMEMBER!

HTML::TreeBuilder objects should be explicitly destroyed when you're
finished with them.  See L&lt;HTML::TreeBuilder&gt;.

=head1 SEE ALSO

L&lt;HTML::Parser&gt;, L&lt;HTML::TreeBuilder&gt;, L&lt;HTML::Element&gt;

=head1 AUTHOR

Current maintainers:

=over

=item * Christopher J. Madsen S&lt;C&lt;&lt; &lt;perl AT cjmweb.net&gt; &gt;&gt;&gt;

=item * Jeff Fearn S&lt;C&lt;&lt; &lt;jfearn AT cpan.org&gt; &gt;&gt;&gt;

=back

Original HTML-Tree author:

=over

=item * Gisle Aas

=back

Former maintainers:

=over

=item * Sean M. Burke

=item * Andy Lester

=item * Pete Krawczyk S&lt;C&lt;&lt; &lt;petek AT cpan.org&gt; &gt;&gt;&gt;

=back

You can follow or contribute to HTML-Tree's development at
L&lt;&lt; http://github.com/madsen/HTML-Tree &gt;&gt;.

=head1 COPYRIGHT AND LICENSE

Copyright 1995-1998 Gisle Aas, 1999-2004 Sean M. Burke,
2005 Andy Lester, 2006 Pete Krawczyk, 2010 Jeff Fearn,
2012 Christopher J. Madsen.

This library is free software; you can redistribute it and/or
modify it under the same terms as Perl itself.

The programs in this library are distributed in the hope that they
will be useful, but without any warranty; without even the implied
warranty of merchantability or fitness for a particular purpose.

=cut
</pre></body></html>