perl -e'print eval("@ARGV")' 7 \* 3