diff options
Diffstat (limited to 't/11axischild.t')
-rw-r--r-- | t/11axischild.t | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/t/11axischild.t b/t/11axischild.t new file mode 100644 index 0000000..58058a1 --- /dev/null +++ b/t/11axischild.t @@ -0,0 +1,18 @@ +use Test; +BEGIN { plan tests => 6 } + +use XML::XPath::Parser; + +ok(1); + +my $xp = XML::XPath::Parser->new(); +ok($xp); + +ok($xp->parse('/AAA')->as_string, "(/child::AAA)"); + +ok($xp->parse('/AAA/BBB')->as_string, "(/child::AAA/child::BBB)"); + +ok($xp->parse('/child::AAA/child::BBB')->as_string, + "(/child::AAA/child::BBB)"); + +ok($xp->parse('/child::AAA/BBB')->as_string, "(/child::AAA/child::BBB)"); |