- or download this
< i t e m 1 / > LF < i t e m 2 / > LF < i t e m 3 / > LF
- or download this
< i t e m 1 / > LF LF < i t e m 3 / > LF
- or download this
use strict;
use warnings;
...
remove_node($node);
print $root->toString();
- or download this
my ($next_node) = $node->findnodes(
'following-sibling::*[ position()=1 and text() ]')
or return;
- or download this
my ($next_node) = $node->findnodes(
'following-sibling::node()[ position()=1 and self::text() ]')
or return;
- or download this
my $next_node = $node->nextSibling()
or return;
$next_node->nodeType() == XML_TEXT_NODE
or return;