Help for this page

Select Code to Download

Select or download this

johngg@abouriou ~/perl/Monks $ perl -Mstrict -Mwarnings -E '
my $digs    = q{0,1,2,3,4,5,6,7,8,9};
...
   glob $globStr;
say for sort keys %combs;' | wc -l
210

Select or download this

johngg@abouriou ~/perl/Monks $ perl -Mstrict -Mwarnings -E '
my $digs    = q{0,1,2,3,4,5,6,7,8,9};
...
   glob $globStr };
   };' | wc -l
210