perl -MO=Deparse -e 'print (2 + 2) * 5'
print(4) * 5;
-e syntax OK