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

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

1029384710985234058763045203948520945862986209845729034856

-> 8


person Lucas    schedule 22.06.2009    source источник


Ответы (2)


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

$digit = substr($bignum, -3, 1);
person Jeremy Smyth    schedule 22.06.2009

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

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

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

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

person Lars Haugseth    schedule 22.06.2009