深层复制 – Perl 6是否有内置工具来制作嵌套数据结构的深层副本

发布时间：2020-12-15 21:43:51 所属栏目：大数据来源：网络整理

导读：Perl 6是否有内置工具来制作嵌套数据结构的深层副本？添加示例： my %hash_A = ( a = { aa = [ 1,2,3,4,5 ],bb = { aaa = 1,bbb = 2 },},);my %hash_B = %hash_A;#my %hash_B = %hash_A.clone; # same result%hash_Baaa[2] = 735;say %hash_Aaaa[2]; # says

Perl 6是否有内置工具来制作嵌套数据结构的深层副本？

添加示例：

my %hash_A = (
    a => {
        aa => [ 1,2,3,4,5 ],bb => { aaa => 1,bbb => 2 },},);


my %hash_B = %hash_A;
#my %hash_B = %hash_A.clone; # same result

%hash_B<a><aa>[2] = 735;

say %hash_A<a><aa>[2]; # says "735" but would like get "3"

解决方法

my %A = (
    a => {
        aa => [ 1,);

my %B = %A.deepmap(-> $c is copy {$c}); # make sure we get a new container instead of cloning the value

dd %A;
dd %B;

%B<a><aa>[2] = 735;

dd %A;
dd %B;

使用.clone和.deepmap来请求数据结构的副本/深层副本.但不要赌它.任何对象都可以定义自己的.clone方法,并用它做任何想做的事情.如果必须进行变异,因此必须进行克隆,请确保使用大型数据集测试程序.糟糕的算法可能使程序在生产中几乎无用.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!