my %badnal = reverse %landab; print $badnal{a} . "\n";