summaryrefslogtreecommitdiff
path: root/t/26predicate.t
diff options
context:
space:
mode:
Diffstat (limited to 't/26predicate.t')
-rw-r--r--t/26predicate.t26
1 files changed, 26 insertions, 0 deletions
diff --git a/t/26predicate.t b/t/26predicate.t
new file mode 100644
index 0000000..8312c0a
--- /dev/null
+++ b/t/26predicate.t
@@ -0,0 +1,26 @@
+use Test;
+BEGIN { plan tests => 4 }
+
+use XML::XPath;
+ok(1);
+
+my $xp = XML::XPath->new(ioref => *DATA);
+ok($xp);
+
+my @bbb = $xp->findnodes('//a/b[2]');
+ok(@bbb, 2);
+
+@bbb = $xp->findnodes('(//a/b)[2]');
+ok(@bbb, 1);
+
+__DATA__
+<xml>
+ <a>
+ <b>some 1</b>
+ <b>value 1</b>
+ </a>
+ <a>
+ <b>some 2</b>
+ <b>value 2</b>
+ </a>
+</xml>