my @arr = (0,1,2);
my @nested = (3,4,\@arr);

print $#{$nested[2]};