Bonjour à tous,
Je crois que j'ai un problème de compréhension.
J'ai un fichier XML dont je ne connais pas la structure.

J'ai fait ce tout petit code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
#!c:\perl\bin\perl.exe
 
use XML::Simple;
use Data::Dumper;
 
$XMLFile="./Exemple.xml";
$StructureFile="structure.csv";
 
 
my $xml= XMLin($XMLFile);
%dumper= Dumper($xml);
Mais à partir de là, je bloque complétement. Comment faire pour récupérer le structure du fichier XML (les noeuds) et les avoir dans un fihcier csv sous forme d'arborescence.
Comment exploiter ce que me ressort Dumper pour récupérer que les clés ?