alive results from the CPAN

alive

HTML-Gumbo

view release on metacpan or search on metacpan

use Scalar::Util qw(weaken);

unless ( do { local $@; eval "use HTML::TreeBuilder 5 -weak; 1" } ) {
    plan skip_all => 'No HTML::TreeBuilder 5 -weak';
}

use_ok('HTML::Gumbo');

# Test for memory leak in tree mode (rt.cpan.org #128667).
# Before the fix, parse_to_tree_cb leaked the root document SV on
# every parse call, keeping the entire tree alive after undef.

my $parser = HTML::Gumbo->new;

{
    my $tree = $parser->parse(<<'END', format => 'tree');
<!DOCTYPE html>
<h1>hello world</h1>
<p>some text</p>
END

( run in 1.055 second using v1.01-cache-2.11-cpan-d7a12ab2c7f )