Re: data extraction XML::Simple

Replies are listed 'Best First'.
Re^2: data extraction XML::Simple by jonnyfolk (Vicar) on Mar 10, 2010 at 23:07 UTC
Hi hadn't realized that the root node was removed, and you example works, thank you very much. Making string more complex, and trying to take you advice into account I am still drawing a blank!! `$newxml = qq~ <record> <namepairs> <name>My Name </name> <img>My image</img> <brochure>My Brochure</brochure> </namepairs> </record>~; my $xml = new XML::Simple(ForceArray => 1, KeyAttr => [], KeepRoot => +1, SuppressEmpty => ''); my $data = $xml->XMLin(\$newxml); #print $data->{'name'}; print $data->{'namepairs'}->{'name'}; #print Dumper($data); exit;` [download]	[reply] [d/l]
Re^3: data extraction XML::Simple by ikegami (Patriarch) on Mar 10, 2010 at 23:12 UTC
The dump shows `VAR1 = { 'record' => [ { 'namepairs' => [ { 'brochure' => [ 'My Brochure' ], 'name' => [ 'My Name ' ], 'img' => [ 'My image' ] } ] } ] };` [download] You don't account for the top level hash or any of the arrays. `print $data->{record}[0]{namepairs}[0]{name}[0];` [download]	[reply] [d/l] [select]
Re^4: data extraction XML::Simple by jonnyfolk (Vicar) on Mar 10, 2010 at 23:25 UTC
Ok, I hadn't understood the difference between the two structures I had posted. It's much clearer to me now. Thanks very much for you help and time.	[reply]

$newxml = qq~
        <record>
          
        <namepairs>
          <name>My Name
</name>
          <img>My image</img>
          <brochure>My Brochure</brochure>
         </namepairs>
                  
        </record>~;

my $xml = new XML::Simple(ForceArray => 1, KeyAttr => [], KeepRoot => 
+1, SuppressEmpty => '');

my $data = $xml->XMLin(\$newxml);

#print $data->{'name'};
print $data->{'namepairs'}->{'name'};


#print Dumper($data);
exit;
[download]

[reply]
[d/l]

VAR1 = {
          'record' => [
                      {
                        'namepairs' => [
                                       {
                                         'brochure' => [
                                                       'My Brochure'
                                                     ],
                                         'name' => [
                                                   'My Name
'
                                                 ],
                                         'img' => [
                                                  'My image'
                                                ]
                                       }
                                     ]
                      }
                    ]
        };
[download]

You don't account for the top level hash or any of the arrays.

print $data->{record}[0]{namepairs}[0]{name}[0];
[download]

[reply]
[d/l]
[select]

Ok, I hadn't understood the difference between the two structures I had posted. It's much clearer to me now. Thanks very much for you help and time.

[reply]