my @sorted_keys = sort_people( \%people, $sort_on, $descending);