perl -e 'print -8 + -15 * 0.5, "\n";' -15.5