http://www.perlmonks.org?node_id=981479


in reply to Re: hash with both values and keys unique to each other
in thread hash with both values and keys unique to each other

This is how I was able to do it. But it might not be a generalized solution

$seen{$chr1}++; $seen{$chr2}++; if (($seen{$chr1}>1)||($seen{$chr2}>1)){ next; } else{ $hash_chr{$chr1}=$chr2; }