http://www.perlmonks.org?node_id=197105


in reply to (tye)Re2: Finding all Combinations
in thread Finding all Combinations

Indeed - I'm not as familiar with binary, so I'll have to ponder a bit, but thanks! I was working on this problem and was working on an algorithm that would iterate through all combos, but the checking back to see if you were REALLY done once you had reached the end of a set was killer for large sets (e.g. 30)...

Replies are listed 'Best First'.
(tye)Re3: Finding all Combinations
by tye (Sage) on Sep 12, 2002 at 05:43 UTC

    Change the while condition to:     while( 9 < ++$pick[$i]  ) { and the return statment to     return reverse @pick; and it will count in base 10. Perhaps that will make it easier to understand what it was doing.

            - tye (but my friends call me "Tye")
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom