Question

My XML looks like this-

<info>
<name>NameGoesHere</name>
<age>99</age>
</info>

Using XML::LibXML::Reader, I would like to print the age.

I read the documentation from here, and I am looking for an example. I am able to use $reader->nextElement('info') and then print innerXML but not able to figure out how do I print only age and not the whole innerxml.

Answer 1

Try localName:

#!/usr/bin/perl
use strict;
use warnings;
use XML::LibXML::Reader;

my $reader = XML::LibXML::Reader->new(IO => \*DATA)
    or die "Cannot read from \\*DATA\n";

while ( $reader->read ) {
    print $reader->readInnerXml if $reader->localName eq 'age';
}

$reader->finish;

__DATA__
<info>
<name>NameGoesHere</name>
<age>99</age>
</info>

Mostly from Regex: keep everything in <profession></profession> tags