Select Code to Download

my %range_counts = ();
my %counts = ();
...
}

print "there were $counts{'4kset'} 4000-6000 lines\n";