perl -e "print 17554.61 + 2194.33 - 19748.94"