perl - 如何在 Perl 中存储引用列表？

Question

我想创建一个记录列表。我可以添加一条记录就好了:

my $records = [
  { ID => 5342755,
    NAME => 'Me',
  } ,
 ];

当我尝试添加另一条记录时，其他记录消失了:

$records = [  { 
  ID => 1212121, 
 } ];

问题是什么，我该如何解决？

Answer 1

问题是您覆盖了 $record 的值，因此数组中只有一个值。也许尝试以下方法:

my $records = [
  { ID => 5342755,
    NAME => 'Me',
  } ,
 ];

push @$records, { 
  ID => 1212121, 
 };