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方法,并用它做任何想做的事情.如果必须进行变异,因此必须进行克隆,请确保使用大型数据集测试程序.糟糕的算法可能使程序在生产中几乎无用.