Help for this page

Select Code to Download


  1. or download this
    $ time perl -MLog::Log4perl=:easy -Mbignum -E 'Log::Log4perl->easy_ini
    +t($DEBUG);$|=1;INFO(qq{before});my $z = -15863.8668285308; INFO(qq{z:
    + }, $z); my $e = exp( $z * -1 ); INFO(qq{e: }, $e); my $p = 1.0/$e;IN
    +FO(qq{p: }, $p);INFO(qq{DONE});'
    2020/08/30 16:29:11 before
    ...
    2020/08/30 16:32:45 p: 0.0[boatload o 0s]00025714300868590761106006809
    +94899649646402
    2020/08/30 16:32:45 DONE
    perl -MLog::Log4perl=:easy -Mbignum -E   214.12s user 0.15s system 99%
    + cpu 3:34.33 total