Discussion :

[kururin]

Bonjour

J'ai un peu honte de poser cette question, mais je ne comprends rien.

J'ai ce xml tout bête:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
<Memory>  
  <Modules>
    <Module name="FIR">111</Module>
    <Module name="BIG">2222</Module>
  </Modules>
</Memory>

je souhaite récupérer les valeurs des noeuds Module. Je fais donc ainsi (chose qui a déjà marché chez moi et que j'ai vu dans plein de tuto):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
  my $parser = new XML::Simple;
  my $doc = $parser->XMLin($xmlFile);
  foreach my $m(@{$doc->{Modules}->{Module}})
  {
     print "Name: ".$m->{name}."\n";      
     print "Value: ".$m."\n";      
  }

Mais en exécutant ce script, ca me retourne:
Not an ARRAY reference en faisant référence à la ligne foreach.

J'arrive pas à voir ce que je fais de travers...
Merci d'avance
K.

[Philou67430]

Le mieux pour comprendre comment manipuler l'objet, est sans doute de le dumper :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
use Data::Dumper;
 
...
 
print Data::Dumper->Dump([$doc], [qw(*doc)]);

Résultat :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
%doc = (
         'Modules' => {
                      'Module' => {
                                  'BIG' => {
                                           'content' => '2222'
                                         },
                                  'FIR' => {
                                           'content' => '111'
                                         }
                                }
                    }
       );

Tu constates que $doc{Modules} est une référence de hash dont le premier élément a pour clé Module et la valeur est constituée à nouveau d'une référence de hash, etc...