$ perl -MO=Concise,-exec -e'print 1..3'
1  <0> enter
2  <;> nextstate(main 1 -e:1) v
3  <0> pushmark s
4  <$> const[AV ] s       <-----
5  <1> rv2av lKP/1
6  <@> print vK
7  <@> leave[1 ref] vKP/REFC
-e syntax OK