Fusionner les hachages intérieurs en Perl

Question

J'ai hash 3 dimensions et un hash 2 dimensions, et je veux fusionner le hachage bidimensionnel avec l'un des hachages intérieurs du hachage 3 dimensions, quelque chose comme ça, qui est similaire à ce que je faire pour fusionner une paire de hachages 2d:

my %3dhash; 
my %2dhash; 
my $key = "some string"; 
%3dhash{$key} = ($3dhash{$key}, %2dhash); 

Mais quand j'ai essayé cela ne fonctionnait pas. Que devrais-je faire?

Answer 1

les opérations suivantes:

my %hash3d; 
my %hash2d; 
.... 
my $key = "some string"; 
$hash3d{$key} = { %{ $hash3d{$key} }, %hash2d }; 

variables en Perl ne peuvent pas commencer par un chiffre, donc je rebaptisés les variables. Le %{ ... } autour du hachage existant l'étend en tant que liste. Cette liste s'aplatit avec la liste de %hash2d. Le { ... } autour de cette liste est le constructeur de référence de hachage anonyme, qui crée une nouvelle référence de hachage qui est ensuite stockée dans $hash3d{$key}