perl -le "print eval(print 1+1)"