Как я могу получить цифры из Perl Bignum?

Question

У меня действительно большое число в Perl. Я использую "Bignum". Как я могу извлечь одну цифру из этого большого числа. Например, если у меня есть такой номер и что получить 3-ю цифру с конца:

1029384710985234058763045203948520945862986209845729034856

-> 8

Answer 1

bignums доступны прозрачно, поэтому это будет работать:

$digit = substr($bignum, -3, 1);

Answer 2

Пакет bignum использует Math::BigInt под капотом для целых чисел.

со страницы руководства Math::BigInt:

$x->digit($n);        # return the nth digit, counting from right

Обратите внимание, что отсчет начинается с 0 для самой правой цифры.