Select Code to Download

sub new
{
...
   $self->{'_counts'} = {};
   return $self;
}

sub SortValues
{
...
      # Print out stuff
   }
}

#e.g for $a, $b would be the same
${${self->{'_counts'}}{$a}}}