1
2
3
4
5
6

%hash = ();
for (1..10) {
    $hash{$_} = $_*$_;
}

print "keys: ", join " ", keys %hash, "\n", "values: ", join " ", values %hash;

Quote

Returns a list consisting of all the values of the named hash. (In a scalar context, returns the number of values.) The values are returned in an apparently random order. The actual random order is subject to change in future versions of perl, but it is guaranteed to be the same order as either the keys or each function would produce on the same (unmodified) hash.