|
NAMETest::XML::XPath - Test XPath assertionsSYNOPSISuse Test::XML::XPath tests => 3; like_xpath( '<foo />', '/foo' ); # PASS like_xpath( '<foo />', '/bar' ); # FAIL unlike_xpath( '<foo />', '/bar' ); # PASS is_xpath( '<foo>bar</foo>', '/foo', 'bar' ); # PASS is_xpath( '<foo>bar</foo>', '/bar', 'foo' ); # FAIL # More interesting examples of xpath assertions. my $xml = '<foo attrib="1"><bish><bosh args="42">pub</bosh></bish></foo>'; # Do testing for attributes. like_xpath( $xml, '/foo[@attrib="1"]' ); # PASS # Find an element anywhere in the document. like_xpath( $xml, '//bosh' ); # PASS # Both. like_xpath( $xml, '//bosh[@args="42"]' ); # PASS DESCRIPTIONThis module allows you to assert statements about your XML in the form of XPath statements. You can say that a piece of XML must contain certain tags, with so-and-so attributes, etc. It will try to use any installed XPath module that it knows about. Currently, this means XML::LibXML and XML::XPath, in that order.NB: Normally in XPath processing, the statement occurs from a context node. In the case of like_xpath(), the context node will always be the root node. In practice, this means that these two statements are identical: # Absolute path. like_xpath( '<foo/>', '/foo' ); # Path relative to root. like_xpath( '<foo/>', 'foo' ); It's probably best to use absolute paths everywhere in order to keep things simple. NB: Beware of specifying attributes. Because they use an @-sign, perl will complain about trying to interpolate arrays if you don't escape them or use single quotes. FUNCTIONS
In all cases, XML must be well formed, or the test will fail. SEE ALSOTest::XML.XML::XPath, which is the basis for this module. If you are not conversant with XPath, there are many tutorials available on the web. Google will point you at them. The first one that I saw was: <http://www.zvon.org/xxl/XPathTutorial/>, which appears to offer interactive XPath as well as the tutorials. AUTHORDominic Mitchell <cpan2 (at) semantico.com>COPYRIGHT AND LICENSECopyright 2002 by semanticoThis library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Visit the GSP FreeBSD Man Page Interface. |