perl - 如何制作 Perl 哈希引用的浅拷贝？

Question

我想推送对哈希的引用。我的意思是我想推送一个对新散列的引用，它是我得到的散列的浅拷贝。

如何创建浅拷贝？

Answer 1

只需复制它:

 my %copy = %$hash;

如果需要另一个引用，只需在匿名哈希构造函数中展开原始引用:

 my $copy = { %$hash };

对于那些对浅拷贝感到疑惑的人:这种赋值只会为顶级键生成新值。任何作为引用的值在新散列中仍将是相同的引用。也就是说，您可以在不更改原始散列的情况下替换新散列中的值。如果您只是更改值，例如将新项推送到匿名数组值上，则两个散列都会发生更改，因为它们共享相同的引用。因此，浅拷贝通常不是您想要的。