Re: HTML::TreeBuilder::XPath returns things I don't need?


XP is just a number
	PerlMonks

Re: HTML::TreeBuilder::XPath returns things I don't need?

by toolic (Bishop)

on Oct 06, 2014 at 15:46 UTC ( [id://1102989]=note: print w/replies, xml )

Need Help??

in reply to HTML::TreeBuilder::XPath returns things I don't need?

XML::Twig (by the same module author) can give you what you want:

use warnings;
use strict;
use XML::Twig;

my $xml = <<XML;
<html>
<title>four</title>
  <head>
   <title>one</title>
  </head>
  <body>
  <title>two</title>
  </body>
<title>three</title>
</html>
XML

my $twig = XML::Twig->new(
    twig_handlers => { 'html/head/title' => sub { print $_->text(), "\
+n" } },
);
$twig->parse($xml);

__END__

one
[download]