in reply to One to one relationship

my %reverse = reverse %languages;
print $languages{$key} || $reverse{$key};

[download]

In Section Seekers of Perl Wisdom