use warnings;
use strict;
use HTML::TreeBuilder::XPath;
use Data::Dump;
my $tree= HTML::TreeBuilder::XPath->new;
$tree->parse(<<'ENDHTML');
ENDHTML
$tree->eof;
dd map {$_->as_text} $tree->findnodes('/html/body//td');
dd $tree->findnodes_as_strings('/html/body//td');
__END__
("Foo", "Bar", "Quz", "Baz")
("Foo", "Bar", "Quz", "Baz")