perl + DOM +使用XML :: LibXML +如何從XML文件中刪除xml版本標題？與DOM

Question

我創建了下面的XML文件，由perl腳本（顯示關閉），使用XML ::的libxml：

more test.xml 

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

我的問題：如何刪除 「XML版本標題」：

 <?xml version="1.0"?> 

來自test.xml文件的

？在perl腳本中使用DOM命令？

爲了只獲取text.xml文件follwoing行：

<books> 
<computer/> 
</books> 

耶爾

＃

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

好吧，關於我以前的評論，我現在找到了一個解決方案。

看起來toFile繞過$skipXMLDeclaration而toString沒有。所以下面的工作：

$XML::LibXML::skipXMLDeclaration = 1; 

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

print $doc->toString; 

（非常小）的缺點是，你必須自己寫文件。