Select Code to Download

my $two_d = [
   [1,2,3],
...

# how many rows in second column?
print scalar @{ $two_d->[1] };

use Math::Matrix;
use Data::Dumper;
...

my $m = Math::Matrix->new($two_d);
print Dumper $m;