my @c = combine(5,@n); # get array of arrays
my @A = @{$c[0]};        # get first sub-array