@players; # list of names
  @keys = sort {
    $data{$half_query}{$stat_query}{$b} #compares on statistic
                     <=>
    $data{$half_query}{$stat_query}{$a}
                     ||
                  $a cmp $b # if they are equal compare on name
} @players;