>perl -MO=Concise -e"local $x = $y
6  <@> leave[1 ref] vKP/REFC ->(end)
1     <0> enter ->2
2     <;> nextstate(main 1 -e:1) v ->3
5     <2> sassign vKS/2 ->6
-        <1> ex-rv2sv sK/1 ->4
3           <#> gvsv[*y] s ->4
-        <1> ex-rv2sv sKRM*/129 ->5
4           <#> gvsv[*x] s/LVINTRO ->5
-e syntax OK