in reply to Re: finding all combinations
in thread finding all combinations
Or more succinctly:
my @array1 = (1,2,3); my @array2 = (7,8); my @array3 = (1,5,23,3); $" = ','; print "$_ " while glob "{@array1}-{@array2}-{@array3}";
|
---|
In Section
Seekers of Perl Wisdom