Help for this page
my %reverse_hash = reverse %hash; if (not exists $reverse_hash{$value}) { $hash{$key} = $value; }