Re: Math::BigInt and Leading Zeros

Replies are listed 'Best First'.
Re^2: Math::BigInt and Leading Zeros by Tanktalus (Canon) on May 04, 2005 at 23:42 UTC
sprintf doesn't quite work - it can only handle whatever the underlying perl library handles natively: `$ perl5.8.6 -MMath::BigInt -e '$i = Math::BigInt->new("123_456_789_000 +_000"); printf "%025d\n", $i' -000000000000000000000001` [download] The next best thing I can think of is: `$ perl5.8.6 -MMath::BigInt -e '$i = Math::BigInt->new("123_456_789_000 +_000"); $s = $i->bstr(); $s = '0' x (25 - length $s) . $s; print $s,$ +/' 0000000000123456789000000` [download] Note that this does the right thing if the string is already longer than you want, e.g.: `$ perl5.8.6 -MMath::BigInt -e '$i = Math::BigInt->new("123_456_789_000 +_000"); $s = $i->bstr(); $s = '0' x (10 - length $s) . $s; print $s,$ +/' 123456789000000` [download] Hope that helps.	[reply] [d/l] [select]
Re^3: Math::BigInt and Leading Zeros by hv (Prior) on May 05, 2005 at 09:38 UTC
The underlying perl library natively handles strings fine - just change '%25d' to '%25s': `zen% perl -MMath::BigInt -e '$i = Math::BigInt->new("123_456_789_000 +_000"); printf "%025s\n", $i' 0000000000123456789000000 zen%` [download] Hugo	[reply] [d/l]
Re^4: Math::BigInt and Leading Zeros by Tanktalus (Canon) on May 05, 2005 at 12:55 UTC
You may not have tried a big enough number. `$ perl5.8.6 -MMath::BigInt -e '$i = Math::BigInt->new("123_456_789_000 +_000_000_000"); printf "%045d\n", $i' -00000000000000000000000000000000000000000001` [download]	[reply] [d/l]
Re^5: Math::BigInt and Leading Zeros by radiantmatrix (Parson) on May 05, 2005 at 19:43 UTC
Re^6: Math::BigInt and Leading Zeros by Tanktalus (Canon) on May 05, 2005 at 23:44 UTC