Bonjour,

Après plusieurs essaies infructueux, je viens chercher un peu d'aide.
Je souhaite créer un script me permettant de faire de la gestion de dossier et droit en me basant sur une base de donnée oracle.

Les informations que j'extrais sont des dossiers et des fichiers (auquel j'affecterai par la suite des groupes et des utilisateurs).
Je contruis à partir de mes requetes un hash dynamique du style :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
$VAR1 = 'dossier1';
$VAR2 = {
          's1dossier1' => [
                      'unfichier1.txt',
                      'unfichier2.txt'
                    ],
          's2dossier1' => [
                       'unfichier3.txt',
                       'unfichier1.txt'
                     ]
        };
$VAR3 = 'dossier2';
$VAR4 = {
          's1dossier2' => {
                             's1ss1dossier2' => [
                                         'unfichier1.txt',
                                         'unfichier5.txt',
                                         'unfichier40.txt'
                                       ],
                             's1ss2dossier2' => [
                                          'unfichier7.txt'
                                        ]
                           },
          's2dossier2' => [
                      'unfichier6.txt',
                      'unfichier7.txt'
                    ],
          's3dossier2' => [
                       'unfichier25.txt',
                       'unfichier65.txt'
                     ]
        };
Je n'ai pas de problème pour générer celui-ci mais pour l'exploiter.
En effet, je souhaite par la suite utiliser celui-ci pour créer une arborescance. A partir du hash dynamique (dont je ne connais pas la forme par avance)
je veux créer les dossiers et les fichiers.
Est-il possible d'exploiter un hash dynamique.
Je souhaite par exemple parcourir le hash et créer les dossiers puis les fichiers si besoins. Mais ne connaissant pas le nombre de hash de hash, je ne peux le parcourir normalement avec des foreach imbriqués.
Existe-t-il des fonctions spécifiques en perl (récursive ou autre ?)