@descending_keys = sort { $b <=> $a } keys %hash;