my $n = scalar @{ $multi[1] };