Select Code to Download

#!/usr/bin/perl
use strict;
...
foreach my $j (sort keys %hash) {
   print "hash{$j} = $hash{$j}\n";
}

hash{0} = 0
hash{1} = 3
...
hash{7} = 7
hash{8} = 7
hash{9} = 7