Re^2: XML::Simple parsing help

[bitingduck]

Alternatively, using XML::TreeBuilder:

use strict;
use warnings;

use XML::TreeBuilder;

my $xml = <<'END';
  <inventors type="array">
    <inventor>
      <city>Aston Clinton</city>
      <name>Andy Barth</name>
      <number type="integer">1</number>
      <country>GB</country>
      <upper-name>ANDY BARTH</upper-name>
    </inventor>
    <inventor>
      <city>Aylesbury</city>
      <name>Daniele Dall'Acqua</name>
      <number type="integer">2</number>
      <country>GB</country>
      <upper-name>DANIELE DALL'ACQUA</upper-name>
    </inventor>
    <inventor>
      <city>Calne</city>
      <name>Nigel Drew</name>
      <number type="integer">3</number>
      <country>GB</country>
      <upper-name>NIGEL DREW</upper-name>
    </inventor>
  </inventors>
END

my $tree=XML::TreeBuilder->new();
 $tree->parse($xml);

my @inventornums=$tree->find_by_tag_name('number');

foreach my $inventornum(@inventornums){
    if ($inventornum->as_text()==2){
        my $parent=$inventornum->parent();
          print $parent->as_XML;
      }

}

[Kenosis]

Excellent, bitingduck!

[bitingduck]

I always find XML::Simple to be so simple that it seems like extra work to back the structure out once it's parsed into a hash. XML::TreeBuilder is easier to wrap my head around with the descriptive method names, but still simpler than using XML::LibXML

[jhoop]

This is a very nice and simple solution.. I'm going to play with this and XML::Rules as suggested by Jenda, see which will work best with my application.. Thanks very much!