perl -Minteger -e 'print 15/2 + 1'