Хеши

# Инициализация хешей

$a{'x'} = "y";
%a = (
    'x' => 'a',
    'y' => 'b',
    'z' => 'c'
);
@b = values(%a);
%b = reverse %a;
delete $a{'x'};

* Хеши в perl не являются упорядоченными.
* Для упорядоченного хеша существует модуль Tie::IxHash

# Перебор хеша:

foreach $k (keys %a) {
    print $a[$k];
}

while (($k,$v) = each(%h)) { ... }

if (exists $a[$k]) { ... }