Select Code to Download

sub Clone2 {
    my $self = shift @_;
...
        "Matrix" => [ map{ [ @$_ ] } @$matrix ]
    );
}

sub Clone3{
    my $self = shift;
...
        map{ [ @$_ ] } @{ $self->{Matrix} } ] 
    }, 'Matrix';
}