for(my $row=0; $row<=$#{$matrix_ref}; $row++){
   for(my $col=0; $col<=$#{$matrix_ref->[$row]}; $col++){
         push @new_array, $matrix_ref->[$row]->[$col];
   }
}