Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number

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).

Comment on Re: XML parsing question
Download Code

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 studying the Monastery: (4)
As of 2016-02-15 00:13 GMT
Find Nodes?
    Voting Booth?

    How many photographs, souvenirs, artworks, trophies or other decorative objects are displayed in your home?

    Results (471 votes), past polls