XML::LibXML::Node replaceNode() 是否替换被替换节点的 Perl 实例

Question

...所以在我将 a 替换为 b 之后，所有先前对 a 的引用现在都指向 b?

Answer 1

#!/usr/bin/perl
use warnings;
use strict;

use XML::LibXML;

my $dom = 'XML::LibXML'->load_xml(string => '<r><p><c/></p></r>');
my ($n1) = $dom->findnodes('/r/p/c');
my ($n2) = $dom->findnodes('/r/p/c');
$n1->replaceNode('XML::LibXML::Element'->new('n'));
print $dom;
print $n1, $n2;

输出：

<?xml version="1.0"?>
<r><p><n/></p></r>
<c/><c/>

XML::LibXML::Node replaceNode() 是否替换被替换节点的 Perl 实例

Does XML::LibXML::Node replaceNode() replace Perl instances of the replaced node

perl

xml-libxml