#!perl -pl
$==-1e8;s""$=+=$-=/^\d.*\d$/&&`bc<<<$_`-$=for$'.$`"ge;$_=$=