Perl

[Perl] itérer sur les valeurs d'un tableau de hash de hash...

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [Perl] itérer sur les valeurs d'un tableau de hash de hash...

z0rglub

bonjour,
j'ai l'habitude programmer en PHP donc j'ai plutôt l'habitude que ce soit facile (Mega troll detected !)

Je n'arrive pas à manipuler un hash à 2 dimensions qui contient au final un tableau (non associatif, un array quoi). Je le passe dans un fonction, il faut inverser les valeurs avec les clefs pour voir si la valeur appartient bien au tableau... Bref que du bonheur en PHP, que de temps perdu en Perl, mais je vais bien réussir à le faire, c pas possible autrement !

Voilà le topo :

Code :

$tab{level1}{level2} = ( 'value1', 'value2' );

j'ai en fait besoin d'une fonction qui me dise si 'value1' est bien une valeur du tableau $tab{level1}{level2}. Comme in_array( 'value1', $tab{level1}{level2} ) le ferait en PHP. Sachant que je dois tester cette appartenance au tableau dans une fonction...

Bref :cry:

---------------
Ma galerie photo créée avec Piwigo et hébergée sur Piwigo.com

Publicité

z0rglub

solution ultra-horrible que j'espère le plus provisoire possible :

Code :

$tab{level1}{level2}{0} = 'value1';
$tab{level1}{level2}{1} = 'value2';
sub my_first_function()
{
if ( in_array( 'value2', $tab{level1}{level2} ) )
{
print 'toto'."\n";
}
}
sub in_array()
{
my $val = $_[0];
my $tab = $_[1];
@list = values %{$tab};
for ( $i = 0; $i <= $#list; $i++ )
{
if ( $list[$i] eq $val )
{
return 1;
}
}
return 0;
}

ref, c'est horrible, mais ça marche

---------------
Ma galerie photo créée avec Piwigo et hébergée sur Piwigo.com

phoenix35

z0rglub a écrit :

Code :

$tab{level1}{level2} = ( 'value1', 'value2' );

Va lire http://www.enstimac.fr/Perl/DocFr/perllol.html
Tu trouveras plein d'infos

Ps: non ce n'est pas une blague malgre le nom !

Message édité par phoenix35 le 06-02-2003 à 17:45:21

FORUM HardWare.fr

Programmation

Perl

[Perl] itérer sur les valeurs d'un tableau de hash de hash...

Sujets relatifs
Besoin d'aide en Programmation Perl	Petit soucis en java / perl ...
[HTML] tableau de taille maximale pour un forum	[Perl] Comment ignorer la casse dans une comparaison ?
Programme en perl !	Comment faire des ancres dans un tableau ?
Compter les ligne d'un tableau	mes valeurs renvoyer par 1 formulaire sont vide !!!!!
[Perl] COmment installe t on un module?	[HTML] Imprimer un grand tableau
Plus de sujets relatifs à : [Perl] itérer sur les valeurs d'un tableau de hash de hash...

Page générée en 0.035 secondes