Dear All, I am using XML::Simple to parse some simple xml files. However I ran into a problem with this particular example. Here is what the data dumper gives me: 
          'reaction' => [
                        {
                          'substrate' => {
                                         'name' => 'cpd:C00084'
                                       },
                          'name' => 'rn:R00710',
                          'product' => {
                                       'name' => 'cpd:C00033'
                                     },
                          'type' => 'reversible'
                        },                       {
                          'substrate' => [
                                         {
                                           'name' => 'cpd:C00068'
                                         },
                                         {
                                           'name' => 'cpd:C00022'
                                         }
                                       ],
                          'name' => 'rn:R00014',
                          'product' => {
                                       'name' => 'cpd:C05125'
                                     },
                          'type' => 'irreversible'
                        },

[download]
What I want to do is get to each product and substrate name for a given reaction and print it out. Here is what I would like to do: 
$data = $xml->XMLin($input_file);

foreach $g (@{$data->{reaction}})
{
        foreach $h ($g->{substrate}){
                $temp1 = $h->{name};
                foreach $i ($g->{product}->{name}){
                      $temp2 = $i->{name}
                      print "$temp1 -- $temp2\n";
                }
        ]
}

[download]
It works for the first product and substrate, but for the second one, since there are now TWO substrates, it doesn't seem to pick it up. The fact that this doesn't work tells me that I am wrong somewhere, but I can't for the life of me figure it out. The error I get is: Bad index while coercing array into hash Any help will be much appreciated!! Thanks in advance. Cheers, Bioswami

In reply to XML parsing Help.. by bioswami

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.