Help for this page

Select Code to Download


  1. or download this
    $ perl5.8.6 -MMath::BigInt -e '$i = Math::BigInt->new("123_456_789_000
+_000"); printf "%025d\n", $i'
-000000000000000000000001
  2. or download this
    $ 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
  3. or download this
    $ 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