#!perl -p
$s=eval(y/ /+/r)-100;s;$s ;