解析XML和XML ::嫩枝

Question

我有一個有100個項目，如下面的XML格式如下

我想分析它，並提取數據1和數據2我怎麼能做到這一點與XML::Twig Perl模塊，

<Item> 
<data1> <data3> date </data3> </data1> 
<data2> data2 </data2> 

</Item> 
<Item> 
<data1> <date3> data22 </data3> </data1> 
<data2> data2 </data2> 
</Item> 
.... 

Answer 1

您的XML不符合規範，因此解析器無法按原樣處理它。主要問題有：

• XML是大小寫敏感的，所以Item別的東西比item
• 關閉標籤用斜槓開始，而不是反斜線
• 應該有頂級元素

解決這些問題，這段代碼的工作原理如下：

use strict; use warnings; 

use XML::Twig; 

my $data = <<END_DATA; 
<items> 
    <item> 
     <data1> data1 </data1> 
     <data2> data2 </data2> 
    </item> 
    <item> 
     <data1> data1 </data1> 
     <data2> data2 </data2> 
    </item> 
</items> 
END_DATA 


my $t = XML::Twig->new(
    twig_handlers => { 
     'item' => sub { 
      # process each item and print contents of dataN elements 
      print 
       $_->first_child_trimmed_text('data1'), "\t", 
       $_->first_child_trimmed_text('data2'),"\n"; 
     }, 
    }, 
)->parse($data);