Perl ハッシュスライス

my @keys = ("ho", "ge", "mo");

my @values = (1, 2, 3);

my %$hash;

@hash{@keys} = @values;

ハッシュスライス。

%hash へ @keys と対応する @values をセットする。

その時、%hashは@hashにする必要あり。