我试图“推”到一个匿名的3元素数组,其引用存储在哈希中:
my %messages; my $to = "To"; ... later ... $messages{$msg_id}{$to} = [ [], [], [] ];
这基本上是可行的,因为Data::Dumper显示了一个空的3元素数组。我的问题是我无法解决如何将数据“推”到这个匿名数组中!我已经尝试了很多事情,但意识到我只是在挣扎。下面是我许多失败的几个例子!第一次
dy1byipe1#
只需要将->[0]移到@{...}中。push的第一个参数必须是数组,而不是引用。请参阅:https://perldoc.perl.org/perlref
->[0]
@{...}
push
#!/usr/bin/perl use strict; use warnings; use Data::Dumper; my %messages; my $msg_id = 123; my $to = "To"; $messages{$msg_id}{$to} = [ [], [], [] ]; my $word = "something"; push(@{ $messages{$msg_id}{$to}->[0] }, ( $word )); print Dumper \%messages; 1;
1条答案
按热度按时间dy1byipe1#
只需要将
->[0]
移到@{...}
中。push
的第一个参数必须是数组,而不是引用。请参阅:https://perldoc.perl.org/perlref