> Not only is that 6 of each number instead of 3, but the order is all messed up. Any idea what's going on here?

A quick note about order -- arrays will stay in the order you assign them in, but hashes may not. If you assign

$array[0] = "foo"
[download]

Then the value foo will always be in the first position in the array, unless you later reassign it in some way.

However, hashes are a bit different. Whenever you have a hash, Perl put's them in whatever order it finds easiest to store them in. So if you assign:

$hash{foo} = "abc";
$hash{bar} = "xyz";
[download]

and you later run:

@somearray = keys %hash
[download]

You cannot expect the key 'foo' to be returned first and 'bar' to be second. The only way to guarantee your output here is to run the command through something like sort:

@somearray = sort(keys %hash);
[download]

-Eric