Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things

Re: XML parsing question

by astroboy (Chaplain)
on Sep 01, 2009 at 03:16 UTC ( #792522=note: print w/replies, xml ) Need Help??

in reply to XML parsing question

Hi, you should dump $doc with something like Data::Dumper:
$VAR1 = { 'document' => { '\\2006\\200601\\20060125\\20060125_19.txt' => { 'record' => [ { 'group' => 'P6', 'data-class' => 'Target', 'sentence-number' => '3' }, { 'group' => 'P6', 'data-class' => 'Good', 'sentence-number' => '12' } ], 'sourcecategory' => 'News Archive', 'datetime' => '2006/01/25', 'schemeversion' => '1.1' }, '\\2006\\200601\\20060125\\20060125_18.txt' => { 'sourcecategory' => 'News Archive', 'datetime' => '2006/01/25', 'schemeversion' => '1.1' } } };

As you can see, the records are an array ref of hashrefs at the same level as the documents attributes ($doc->{document}->{$key}->{record}). You can iterate over the records at this point (i.e. check if record is defined and is an arrayref).

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://792522]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (8)
As of 2016-10-26 23:28 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (350 votes). Check out past polls.