如何确定perl范围迭代器的最大范围？

发布时间：2020-12-16 06:18:58 所属栏目：大数据来源：网络整理

导读：我可以超过perl的范围迭代界限,有或没有-Mbigint： $? perl -E 'say $^V; say for (0..shift)' 1e19v5.16.2Range iterator outside integer range at -e line 1. 我怎样才能确定这个上限,而不是直到我超过它？解决方法这是一个IV. 同样适用于整数,所以你可

我可以超过perl的范围迭代界限,有或没有-Mbigint：

$? perl -E 'say $^V; say for (0..shift)' 1e19
v5.16.2
Range iterator outside integer range at -e line 1.

我怎样才能确定这个上限,而不是直到我超过它？

解决方法

这是一个IV.

>>同样适用于整数,所以你可以使用

my $max_iv = -1 >> 1;
my $min_iv = -(-1 >> 1) - 1;

它们也可以来自IV的大小.

my $max_iv = (1 << ($iv_bits-1)) - 1;
my $min_iv = -(1 << ($iv_bits-1));

可以使用获得IV的大小

use Config qw( %Config );
my $iv_bits = 8 * $Config{ivsize};

要么

my $iv_bits = 8 * length pack 'j',0;

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!