activePerl 5.8 based
#!C:\\Perl\\bin\\perl.exe
use strict;
use warnings;
# declare a new hash
my %some_hash;
%some_hash = (\"foo\", 35, \"bar\", 12.4, 2.5,
And if you are crazy and have no duplicate values in your hash, and you need the values sorted, you can call reverse on it.
my %hash = ("a" => 1, "b" => 2, "c" => 3, "d" => 4);
my %reverse_hash = reverse %hash;
print $_ for sort keys %reverse_hash;
Caveat is the unique values part, duplicates will be overwritten and only one value will get in.