如何从Perl bignum中获取数字?

Luc*_*cas 3 perl bignum

我在Perl中有一个非常大的数字.我用"bignum".如何从这个大数字中提取单个数字.例如,如果我有一个这样的数字以及从最后得到第三个数字的内容:

1029384710985234058763045203948520945862986209845729034856

- > 8

Jer*_*yth 11

bignums是透明可用的,所以这将工作:

$digit = substr($bignum, -3, 1);
Run Code Online (Sandbox Code Playgroud)


Lar*_*eth 8

bignum软件包Math::BigInt在引擎盖下用于整数.

Math::BigInt手册页:

$x->digit($n);        # return the nth digit, counting from right
Run Code Online (Sandbox Code Playgroud)

请注意,对于最右边的数字,计数从0开始.