如何有效地创建连续数字的perl哈希?

前端之家收集整理的这篇文章主要介绍了如何有效地创建连续数字的perl哈希?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我需要创建这样的东西:

my $valueref = {
    1 => 1,2 => 2,3 => 3,4 => 4
};

根据某些条件,它可能高达40,或50或60.在每种情况下,它将是连续的整数,如示例中所示.一旦创建,它将永远不会被更改,只需传递给预先存在的子例程.由于键和值都是连续的,我也可以使用for循环创建哈希.我很好奇什么是创建哈希的最快和/或最有效的方法?或者,如果还有另一种方式可以做到的话?

解决方法

使用地图就足够了:

my $valueref = { map { $_ => $_ } 1 .. 40 };

虽然有人可能会注意到这实际上是一个数组…

my @array = 0 .. 40;

所以$valueref-> {$n}实际上是$array [$n].我不知道在这种情况下使用哈希是否有任何好处.

猜你在找的Perl相关文章