C:\_32>perl -wle "$r = 10384593717069655257060992658440191.0 - (5192296858534827628530496329220095.0 * 2); print $r;" 1