|
|
ok($pi); | ok($pi); |
ok($pi->nodeType, XML_PI_NODE); | ok($pi->nodeType, XML_PI_NODE); |
ok($pi->nodeName, "foo"); | ok($pi->nodeName, "foo"); |
ok( $pi->textContent, undef); |
my $data = $pi->textContent; |
ok( $pi->getData, undef); |
# undef or "" depending on libxml2 version |
|
ok( !defined $data or length($data)==0 ); |
|
$data = $pi->getData; |
|
ok( !defined $data or length($data)==0 ); |
$pi->setData(q(bar&)); | $pi->setData(q(bar&)); |
ok( $pi->getData, q(bar&)); | ok( $pi->getData, q(bar&)); |
ok($pi->textContent, q(bar&)); | ok($pi->textContent, q(bar&)); |