perl + DOM + utilise XML :: LibXML + comment supprimer le titre de la version xml du fichier XML? avec DOM

Question

je crée le fichier XML suivant, par le script perl (affichage vers le bas), en utilisant XML :: LibXML:

more test.xml 

<?xml version="1.0"?> 
<books> 
<computer/> 
</books> 

Ma question: comment supprimer "la version xml title":

 <?xml version="1.0"?> 

à partir du fichier test.xml? Avec les commandes DOM dans le script Perl?

afin d'obtenir que les lignes follwoing dans le fichier text.xml:

<books> 
<computer/> 
</books> 

Yael

#

le script perl:

#!/usr/bin/perl 

use strict; 
use warnings; 
use XML::LibXML; 

my $doc = XML::LibXML::Document->new; 
my $root = $doc->createElement('books'); 
$doc->setDocumentElement($root); 

my $computer = $doc->createElement('computer'); 
$root->appendChild($computer); 
$doc->toFile('/var/tmp/test.xml'); 

Answer 1

D'accord, en ce qui concerne mon précédent commenter, j'ai maintenant trouvé une solution. Il semble toFile contourne $skipXMLDeclaration alors que toString ne le fait pas. Ainsi, les travaux suivants:

$XML::LibXML::skipXMLDeclaration = 1; 

my $doc = XML::LibXML::Document->new; 
# create your document 

print $doc->toString; 

Le (très petit) inconvénient est que vous devez écrire le fichier vous-même.