List :: MoreUtils的each_array()和each_arrayref()中的内存泄漏?

时间:2011-06-22 10:18:56

标签: perl

我刚刚使用List :: MoreUtils中的each_array()和each_arrayref()发现了令人讨厌的内存泄漏。

这三行代码是每次运行执行四千次子程序的一部分。 我的目标是为散列中已有的值提供适当的格式。我有一个固定数量的散列键和每个散列键的格式字符串。

my %hash = ();
# ...
my $two_arrays = each_arrayref( $field_list, $field_list_format );
while ( my ( $field, $format ) = $two_arrays->() ) {
    $hash{ $field } = sprintf $format, $hash{ $field };
}

如果我在return;之前粘贴my $two_arrays ...,则泄漏消失。与最后一行相同的return;会造成泄密。

由于子程序是守护程序的一部分,我注意到内存的持续增长(包括VIRT和RES)。

我做错了什么?是否有任何内存泄漏的each_array()或each_arrayref(),我不知道?

  • List :: MoreUtil(VERSION 0.22)
  • Linux 2.6.32-32-generic上的Perl 5.12.1(带线程的x86_64)(Ubuntu 10.04)

1 个答案:

答案 0 :(得分:7)

List :: MoreUtil(VERSION 0。02)发布日期为2006年7月,5年前。目前的版本是0.32,这个版本仍然存在泄漏?在最近几个版本中修复了几个内存泄漏:http://cpansearch.perl.org/src/ADAMK/List-MoreUtils-0.32/Changes