带有元素的Perl数组,该元素可能是另一个哈希数组

时间:2015-10-23 22:29:54

标签: perl hash

假设我们有这个数组结构:

push @active_connections, {
                           token => $token,
                           pending => VALID_WEBSOCKET,
                           time=>time(),
                           badge => 0,
                           monlist => $monlist,
                           intlist => $intlist,
                           last_sent=>{},
                           platform => $platform
                          };

我后来想要添加到last_sent,这样last_sent将有两个值,“id”和该值的“值”,这本身就需要是一个列表。

换句话说,假设我有ids = 1,2,3和相关值10,20,30 我希望能够做到:

$active_connections[i]->last_sent{'1'} should return 20
$active_connections[i]->last_sent{'3'} should return 30

如何设置last_sent以便能够执行此类操作?

感谢

1 个答案:

答案 0 :(得分:2)

您无需“设置”任何内容。只需取消引用相关值,autovivification将完成其余的工作。

$active_connections[$i]->{last_sent}->{1} = 20;
$active_connections[$i]->{last_sent}->{3} = 30;