use strict; use warnings; use Test::More 'no_plan'; use Test::XML::XPath; my $html = <<'END'; END like_xpath $html, '/html', 'An XHTML document';