in reply to Re^2: Sorting the hash
in thread Sorting the hash

Which is why we use strict, the line should read 
print Dumper(\%x);

[download]
And by using stricture the error was highlighted rather than causing you to puzzle out why there was no returned values.

print "Good ",qw(night morning afternoon evening)[(localtime)[2]/6]," fellow monks."

In Section Seekers of Perl Wisdom