Help for this page

Select Code to Download


  1. or download this
    # ! perl -slw
use strict;
...
print "First 10 permutations; enter to see the rest"; <STDIN>;

nForS{ print "@_\n"; } \@state, 3, 6, 9;
  2. or download this
    C:\test>junk
0 0 0
...
2 5 6
2 5 7
2 5 8
  3. or download this
    # ! perl -slw
use strict;
...
a 12 0.20947265625
a 12 0.556488037109375
...