小编Lee*_*e H的帖子

我正在尝试使用XML :: Simple解析Perl中的一些XML.

XML遵循以下格式:

   <result>
    <doc>
      <field name="title">Sample Title</field>
      <field name="content">Content 1</field>
      <field name="content">Content 2</field>
      .
      .
      .
      <field name="content">Content n</field>
    </doc>
   </result>

使用XML :: Simple我试图解析它并打印标题和所有内容.问题是只打印了最后一个内容项.我决定使用Dumper,这就是它返回的内容:

$VAR1= {
  'result'=> {  
           'doc' => [
                {
                  'field' => {                    
                                'content' => {
                                             'content' => 'Content n'
                                             },
                                'title' => {
                                             'content' => 'Sample Title'
                                           }
                                 }
                      }

仅为每个doc元素显示最后一个内容项.这有什么理由吗？如何让它检测所有内容项？

编辑:这是代码:

my $url = "http://www.testurl.com/test.xml";
my $content = get $url;
die "Couldn't get XML" unless defined $content;

my $xml = new XML::Simple;
my $xmlData …