>perl -MO=Concise -e"$s"
4  <@> leave[1 ref] vKP/REFC ->(end)
1     <0> enter ->2
2     <;> nextstate(main 1 -e:1) v ->3
-     <1> ex-rv2sv vK/1 ->4
3        <#> gvsv[*s] s ->4
-e syntax OK

>perl -MO=Concise -e"@a"
5  <@> leave[1 ref] vKP/REFC ->(end)
1     <0> enter ->2
2     <;> nextstate(main 1 -e:1) v ->3
4     <1> rv2av[t2] vK/1 ->5
3        <#> gv[*a] s ->4
-e syntax OK