>>154
for(0..9){ push @A, shared_clone([$_, $_+1, $_+2]) }