Отображение массива дополнительно к существующему хешу в Perl

Question

Как я могу добавить элементы в существующий хеш, как push в массиве, но используя отображение?

Если я сделаю:

%existing_hash = map { $_ => 1 } @new_elements;

Это сбрасывает% существующие_hash.

Answer 1

Я думаю, я бы сделал это простым способом:

$existing_hash{$_} = 1 for @new_elements;

Но вы также можете использовать фрагмент хеша:

@existing_hash{@new_elements} = (1) x @new_elements;

Answer 2

Попробуйте:

%existing_hash = (%existing_hash, map { $_ => 1 } @new_elements);