>perl -MO=Concise,-exec -e"use utf8; $x='abc';"
1  <0> enter
2  <;> nextstate(main 7 -e:1) v:U,{
3  <$> const[PV "abc"] s
4  <#> gvsv[*x] s
5  <2> sassign vKS/2
6  <@> leave[1 ref] vKP/REFC
-e syntax OK