perl - 在 Perl 中合并内部哈希

Question

我有 3 维散列和 2 维散列，我想将 2 维散列与 3 维散列的一个内部散列合并，类似这样，这类似于我合并一对 2d 散列：

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

但是当我尝试它时它不起作用。我应该做什么？

Answer 1

尝试以下操作：

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

Perl 中的变量不能以数字开头，所以我重命名了变量。现有哈希周围的%{ ... }将其扩展为列表。此列表与来自 的列表扁平化%hash2d。该{ ... }列表周围是匿名哈希引用构造函数，它创建一个新的哈希引用，然后将其存储在$hash3d{$key}