Select Code to Download

use strict;
use warnings;
...
print "found ", scalar keys %output, " combinations.\n";
print "$_\n" foreach sort keys %output;

found 210 combinations.
0123
...
5789
6789