Discussion :

[LFC]

Bonjour,

Je dispose d'un tableau associatif que je remplis après une req mysql

la req est :
"select valeur1, champ1, champ2, champ3 from latable where ....."

Puis, tout de suite après je veux mettre les infos recueillies dans des tableaux associatifs qui sont comme ceci :
$tableau{champ1}{champ2}{$champ3}{balise}=+$valeur

Donc, la valeur de "$tableau{champ1}{champ2}{$champ3}{balise}" augmente selon le $valeur, n'est ce pas ?

Ma question est :

Comment faire pour qu'à la fin de tout mon script, tout ce que j'ai mémorisé je puisse l'insérer dans une table de la manière suivante :
"insert into table values a=$champ1, b=$champ2, c=champ3" ??

j'ai beau essayé "foreach my $champ1 (keys %tableau){ requete insert" les données ne ressortent pas...

Merci de votre aide.

[djibril]

tu dois te perdre dans ton hash complex. Relis dans la FAq la partie des references. ça pourra t'eclairer sur l'utilisation des hash de tableau etc

[pospos]

en fait ton $tableau{champ1}{champ2}{$champ3}{balise} il faut que tu le vois comme ca:
$tableau{champ1}->{champ2}->{$champ3}->{balise}

chaque entrée contient une reference vers un autre hash.

Sinon dans ton post je ne sais pas si c'st une faute de frappe mais tu a ecrit =+ au lieu de +=

[LFC]

Merci, je vais lire plus la doc et reviens vers vous.

[LFC]

Bon, toujours pas...

Les tableaux associatifs, ça m'a l'air bien compliqué...

Faisons simple au début.

comment afficher toute la liste des variables qui sont dans le tableau ?

J'ai essayé d'imbriquer des foreach mais ça ne fait rien...

J'ai testé ceci

Code :

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

1
2
3
4
5
6
 
foreach (keys %tableau){
    foreach (keys %tableau){
print "$tableau{$champ1}{$champ2}{$champ3}{balise1}\n";
}
}

et ça n'affiche rien...

Pourtant le même print un peu plus haut dans le code (juste après un while qui mémorise les données) confirme qu'il y a bien des données à l'intérieur, mais je n'arrive pas à isoler cet affichage à la fin de mon code...

Une idée ?

[2Eurocents]

Ta boucle externe doit bien être sur les clefs de %tableau, mais la boucle à l'intérieur doit être sur les clefs de %tableau{$clef}, et la boucle suivante sur les clefs du hachage de niveau inférieur, etc.

Dans la forme, plutôt quelquechose dans cet esprit :

Code :

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

1
2
3
4
5
6
foreach my $clef1 (keys %tableau){
    foreach my $clef2 (keys %tableau{$clef1}){
        ...
        print "$tableau{$clef1}{$clef2}{$clef3}{balise1}\n";
    }
}

Sinon, pour une introspection complète de la structure, le module Data:umper est très pratique :

Code :

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

1
2
3
use Data::Dumper;
 
print Dumper(%tableau);