克隆和大型结构处理的问题

Question

我的 Perl 脚本有我不明白的奇怪行为。我正在处理存储为哈希数组的大型结构，该数组在处理过程中不断增长。问题是，当我将结构存储在硬盘上时，它的最大大小约为 8mb，但在处理它时，它需要大约 130mb 的 ram。为什么差别这么大？

主要处理流程如下：

while(...)
{
    my %new_el = %{Storable::dclone \%some_el};

    # ...
    # change a few things in new_el
    # ...

    push @$elements_ref, \%new_el; 
}

Answer 1

您制作的数据副本超出了您的需要。尽可能尝试使用 hashrefs 而不是取消引用：

while (...)
{
    my $new_el = Storable::dclone \%some_el;

    # ...
    # change a few things in new_el
    # ...

    push @$elements_ref, $new_el; 
}

更好的是不要克隆整个哈希 - 也许您可以就地更改它？