loop dans hash

bonjour,

j'ai un petit soucis,

j'ai le contenu d'une sous valeur d'un hash : $destination->{file}

qui vaut (si je fais un print Dumper($destination->{file});)

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

$VAR1 = { 'c.txt' => { 'remotefolder' => '/tmp/test3' }, 'a.txt' => { 'remotefolder' => '/tmp/test1' }, 'b.txt' => { 'remotefolder' => '/tmp/test2' } };

---

comment puis-je faire un loop qui lit pour chaque "file" (a.txt, b.txt) le remotefolder ? (et le file, j'ai besoin d'utiliser les deux variables pour faire des actions)

j'ai testé pas mal de choses mais pas encore trouvé comment faire le truc :(

merci à vous

amicalement

Bonjour,

Code:

---

1 2 3

foreach my $nom_fichier ( keys %{ $destination->{file} } ) { print $destination->{file}{$nom_fichier}{remotefolder},"\n"; }

---

excellent merci beaucoup je test de suite,
j'avais testé avec $destination->{file}->{$nom_fichier}->{remotefolder}
mais ça ne fonctionait pas

merci ça marche au poil :)

maintenant je dois trouver comment le faire fonctionner lorsqu'il n'y a qu'une seule entrée.

avec un seul fichier, le hash ressemble à ça :

Code:

---

1 2 3 4 5

$VAR1 = { 'remotefolder' => '/tmp/test1', 'name' => 'a.txt' };

---

et du coup la boucle ne fonctionne pas

(en fait ça vient d'un XML avec des entrées du genre) :

Code:

---

1 2 3

<file name="a.txt" remotepath="/toto"/> <file name="b.txt" remotepath="/toto"/>

---

Analyse ton XML avec XML::Twig au lieu de XML::Simple ;) !

erf j'aimerais bien mais je devrais refaire tout mon code qui est assez gros maintenant :)

j'ai trouvé une solution avec un simple

Code:

---

1 2 3 4 5 6 7 8 9 10

if (!defined($destination->{file}->{name})) { # plusieurs entrées foreach my $ftpfilename ( keys %{ $destination->{file} } ) { print $destination->{file}{$ftpfilename}{remotefolder}, "\n"; } } else { # une seule entrée print $destination->{file}->{remotefolder}, "\n"; }

---