The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more

# $Id: xmlxpath_26predicate.t,v 1.1.1.1 2003/12/04 20:40:43 mrodrigu Exp $
use Test;
plan( tests => 4);
ok(1);
my $parser= XML::DOM::Parser->new;
my $t= $parser->parse( \*DATA);
ok( $t);
my @bbb = $t->findnodes( '//a/b[2]');
ok(@bbb, 2);
@bbb = $t->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>