如何在Perl中使用哈希哈希？

Question

我想在Perl中构建一个具有哈希和变量的结构，然后创建一个哈希，每个字段将包含我创建的结构。 像这样：

use Class::Struct;

struct exmpl => {hash=>'%' , val => '$'}; 
my %hash_of_structs;
$hash_of_structs { "one" } = exmpl -> new ();

现在hash_of_structs有一个带有“一个”键的字段，其中包含结构示例。 我的问题是如何将新值推入结构内部的哈希中？

我想出了如何使用struct中的值：

$hash_of_structs { "one" } -> val ("1");
printf ( "The value is: %d\n",$hash_of_structs { "one" }-> val );

但这与结构中的哈希不同。 我试过了：

$hash_of_structs { "one" } => hash{"uno"}("1");

谢谢 ：）

Answer 1

使用以下语法。 如果传递了哈希引用，则旧内容将被忘记，如果提供两个参数，则会添加一个键-值对。

$hash_of_structs{one}->hash({'A', 'a', 'B', 'b'});
$hash_of_structs{one}->hash('key', 'value');