foreach my $key (
    sort {
        $self->{_counts}->{$a} <=> $self->{_counts}->{$b}
    } keys %{ $self->{_counts} }