$t = [ @matrix ] #### my @matrix=([qw(1 2 4 4)],[qw(5 2 0 8)],[qw(9 10 11 12)],); my $t = [ @matrix ]; #### my $t = [ [qw(1 2 4 4)],[qw(5 2 0 8)],[qw(9 10 11 12)], ];
## my @matrix=([qw(1 2 4 4)],[qw(5 2 0 8)],[qw(9 10 11 12)],); my $t = [ @matrix ]; ##
## my $t = [ [qw(1 2 4 4)],[qw(5 2 0 8)],[qw(9 10 11 12)], ];