Select Code to Download

#234567
1#34567
...
1234#67
12345#7
123456#

@numbers = (1..8);
for ( 0 .. 7 ) {
...

print "$count possible winning combinations\n";

##345678
#2#45678
#23#5678
etc

($_='kkvvttuubbooppuuiiffssqqffssmmiibbddllffss')
 =~y~b-v~a-z~s;                             print