in reply to Re^2: confused with a hash which contains reversed keys
in thread confused with a hash which contains reversed keys

At best, it works great for that hash. At worse, you'd have to change the sort criteria.

sub get_key { my $key1 = $_[0]; my $key2 = reverse $key2; return (sort $key1, $key2)[0]; }

Either way, the concept I proposed works fine.