*Web::Scraper::build_tree = sub { my($self, $html) = @_; my $t = HTML::TreeBuilder::XPath->new; $t->store_comments(1) if ($t->can('store_comments')); $t->no_space_compacting(1); $t->ignore_unknown(0); $t->parse($html); $t->eof; $t; };