dalton:
The order of hash content is arbitrary. This snippet (from perldoc -q Hash) brushes the topic:

• How do I process an entire hash?
  • Use the each() function (see "each" in perlfunc) if you don't care whether it's sorted:
    

          while ( ($key, $value) = each %hash) {
              print "$key = $value\n";
          }
    [download]

    
    If you want it sorted, you'll have to use foreach() on the result of sorting the keys ...

HTH, but the real bottom line is -- please read your documentation.