Perl ハッシュスライス

my @keys = ("ho", "ge", "mo");
my @values = (1, 2, 3);
my %$hash;
@hash{@keys} = @values;
ハッシュスライス。
%hash へ @keys と対応する @values をセットする。
その時、%hashは@hashにする必要あり。