Okay, I know that questions *similar* to this have been answered here before.
But mine requires what I believe is one more step that I cannot achieve with my peanut of a brain :)

Basically, I have the following hash:

%db = (
   'scores' => {
                'user1' => 200,
                'user2' => 190,
                'user3' => 232,
                'user4' => 187,
                'user5' => 190
               }
);

[download]

This hash is a list of scores that users have obtained at a certain activity. What I want to do with this hash is print out a "trophy stand" type of output, that shows the users in a list from highest score to lowest and their scores. All users need to be placed in their proper position (such as 1st and 2nd place). The hash is much bigger than this. Pretend there are at least 30 users in the hash. Some of this is simple to do, but there is one thing I could not bypass: the exception of multiple users who have the same score.

What I have right now basically outputs my example hash as:

1st Place: user3 (232 Points)
2nd Place: user1 (200 Points)
3rd Place: user2 (190 Points)
4th Place: user5 (190 Points)
5th Place: user4 (187 Points)

[download]
What the output should really look like is this, where tied scores are put at the same level:

1st Place: user3 (232 Points)
2nd Place: user1 (200 Points)
3rd Place: user2 (190 Points), user5 (190 Points)
4th Place: user4 (187 Points)

[download]

Here is what I have for code:

my @totals = sort { $db{'scores'}{$b} <=> $db{'scores'}{$a} } keys(%{$
+db{'scores'}});

#Right here I need something that places all the users and their score
+s in another hash
#This new hash would probably be a hash of arrays.
#I just can't figure it out!

#Also, these lines here should not be hardcoded!
#I do not know how many positions there are!
#Meaning I manually outputted places 1st through to 5th,
#but there might be 25 of them!
#There should be some kind of loop that does it for me

print qq|
1st Place: $totals[0]
2nd Place: $totals[1]
3rd Place: $totals[2]
4th Place: $totals[3]
5th Place: $totals[4]
|;

[download]

I hope I was able to make myself clear on what I am asking for.
If anyone can get this for me, I will love you to death!
Yes, I am capable of loving someone so much that they die :)

In reply to Sorting Keys and Values by mt2k

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.