$ perl -MO=Concise,-exec -e'timex();'
1  <0> enter
2  <;> nextstate(main 1 -e:1) v:{
3  <0> pushmark s
4  <$> gv(*timex) s/EARLYCV
5  <1> entersub[t1] vKS/TARG,1
6  <@> leave[1 ref] vKP/REFC
-e syntax OK