$ perl -e " use bignum; my $q = 123 + 1/3; print join q{ }, $_, $q->digit(-$_),$/ for 1 .. 5 ; warn ref $q " Can't use an undefined value as an ARRAY reference at ...lib/Math/BigInt/Calc.pm line 1209.