$ perl -MO=Deparse,x7 -e'1;' '???'; -e syntax OK