Subject: | 01-RoundTrip.t of 20 digits or more |
Date: | Sat, 23 Jun 2012 09:52:50 +1000 |
To: | bug-Lingua-JA-Numbers [...] rt.cpan.org |
From: | Kevin Ryde <user42 [...] zip.com.au> |
With recent debian i386 perl 5.14.2 built with 64-bit UV, the round-trip
test of Lingua-JA-Numbers fails variously with
# at t/01-RoundTrip.t line 18.
# got: '123456789012346000000'
# expected: '1.23456789012346e+20'
Looks like stringizing of the numbers gives scientific format after 20
digits. It works for me if $num is kept as a string with a string
concat instead of a multiply
if ($num) {
$num .= $_ % 10;
} else {
$num = '1';
}