use strict; use warnings;
use Test;

BEGIN { plan tests => 3 }

use XML::XPath;
ok(1);

my $xp = XML::XPath->new(ioref => *DATA);
ok($xp);

my @nodes = $xp->findnodes("//*[namespace_uri() = 'foobar.example.com']");
ok(@nodes, 4);


__DATA__
<xml xmlns="foobar.example.com">
    <foo>
        <bar/>
        <foo/>
    </foo>
</xml>