Arrays 将数组值分配给散列
我有一个类似的数组Arrays 将数组值分配给散列,arrays,perl,hash,Arrays,Perl,Hash,我有一个类似的数组 @arr = ("test1","test2","test3","test4",...); hashref已经具有以下值 $hash->{name} = 'name1'; $hash->{addr} = 'addr'; 我需要将每个数组元素添加到散列中,如下所示 $hash->{array_1} = "test1"; $hash->{array_2} = "test2"; $hash->{array_3} = "test3"; ..
@arr = ("test1","test2","test3","test4",...);
hashref已经具有以下值
$hash->{name} = 'name1';
$hash->{addr} = 'addr';
我需要将每个数组元素添加到散列中,如下所示
$hash->{array_1} = "test1";
$hash->{array_2} = "test2";
$hash->{array_3} = "test3";
..
我如何才能轻松实现这一点
(我不需要像$hash->{array_1}=$arr[0];
…)。是否有其他方法将这些数组元素指定为哈希值?您可以使用
或
@$hash{ map "array_$_", 1 .. @arr } = @arr;
$hash->{"array_$_"} = $arr[$_-1] for 1 .. @arr;