PerlのXML ::小枝コピー

Question

は子供をコピーせずに

my $nodeCopy = $node->copy(); 

のように気にいらを使用することが可能ですか？私はpage on CPANについて何も見つけることができません。しかし、多分私は何かを欠いている？

Answer 1

私は方法を見つけました。もし誰か他の人が同じようなものを探すなら、ここにそれを残すことになる。あなたがしなければならないのはcut_childrenです。 私はこのようにしました：

my $nodeCopy = $node->copy();  #copy the node 
$nodeCopy->paste('before', $node); #paste the node 
$node->cut_children();    #remove children from the original node