Help for this page

Select Code to Download


  1. or download this
    #! perl -slw
use strict;
...
my $iter = combinations( [0..55], 5 );

print join ' ', @total[ @$_ ] while defined( $_ = $iter->next );
  2. or download this
    getallcombos.pl:5: Compilation failed in require
getallcombos.pl:5: BEGIN failed--compilation aborted
this sentence appears to be wrong
use Algorithm::Combinatorics qw[ combinations ];