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

if you use that the code is ok if ( defined($hash{reverse($_)})and $hash{reverse($_)} ne $hash{$_} )

In Section Seekers of Perl Wisdom