$ perl -MO=Concise,-exec -e'time();'
1  <0> enter
2  <;> nextstate(main 1 -e:1) v:{
3  <0> time[t1] v
4  <@> leave[1 ref] vKP/REFC
-e syntax OK