Select Code to Download

#! perl -slw
use strict;
...
0.00000000000000000000000000000000000002350988701644575015937473074444
+491355637331113544175043017503412556834518909454345703125
0.00000000000000000000000000000000000001175494350822287507968736537222
+2456778186655567720875215087517062784172594547271728515625
0.00000000000000000000000000000000000000587747175411143753984368268611
+12283890933277838604376075437585313920862972736358642578125

C:\test>ddt
0 10000000000 1001001000011111101101010100010001000010110100011000    
+        3.14159265358979310e+000
...
0.0000000000000001384626433832795
3.1415926535897932384626433832795 Calculated
3.1415926535897932384626433832795 Input