En Perl, comment créer et utiliser un tableau de hachages?

Question

Comment faire un programme Perl qui contient un tableau et ce tableau pointe un hachage?

Il est comme ça picturalement,

(M1)  (M2)  ...it goes on 
|--k1=>v1 |--K1=>v1 
|--k2=>v2 |--k2=>v2 

je devrais accéder à ce tableau M1, le hachage contient à l'intérieur. (et ainsi de suite) ...

Answer 1

Cela devrait le faire - mais il est pas tout à fait clair pour moi que vous vouliez « M1 » et « M2 » à jouer dans le scénario:

my(@array) = ({ k1 => "v1", k2 => "v2" }, { K1 => "V1", K2 => "V2" }); 

print "$array[0]->{k1}\n"; 
print "$array[1]->{K2}\n"; 

Vous faites votre vie plus intéressant lorsque vous utilisez différents ensembles de clés dans les différents éléments du tableau (k1 et k2 par rapport à K1 et K2). C'est loin d'être interdit, mais cela rend le traitement plus difficile.

Answer 2

Vous avez besoin d'une référence de hachage, comme indiqué par {} ci-dessous.

my @array = ({ k1 => "v1", k2 => 'v2' }, { K1 => 'V1', }); 

Answer 3

Vous devez utiliser hachage references:

my @array;  
push @array, { k1=>"v1", k2=>"v2" }, { k1=>"v1", k2=>"v2" }; 

Ensuite, accédez aux hash comme ceci:

my $val = $array[0]{k1}; 

Answer 4

Quelque chose comme:

%h1 = ('a'=>'abc','b'=>'bcd'); # hash 1 
%h2 = ('A'=>'Abc','B'=>'Bcd'); # hash 2 
@arr = (\%h1,\%h2); # array of hash references. 
foreach $hash_ref (@arr) { # iterate through the array. 
     foreach $key(keys %$hash_ref) { # iterate through the hash. 
       print $key.' '.$$hash_ref{$key}."\n"; #print key => value 
     } 
} 

Answer 5

Dans l'intérêt de vous apprendre à poisson, voici un lien vers le Perl data structures cookbook (perldsc) sur la construction de structures de données complexes en Perl.