Perl XML :: Twig Копирование без детей

Question

Можно ли использовать Somthing как

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