$ perl -MO=Concise -e '$a+$b' 6 <@> leave[1 ref] vKP/REFC ->(end) 1 <0> enter ->2 2 <;> nextstate(main 1 -e:1) v ->3 5 <2> add[t1] vK/2 ->6 - <1> ex-rv2sv sK/1 ->4 3 <$> gvsv(*a) s ->4 - <1> ex-rv2sv sK/1 ->5 4 <$> gvsv(*b) s ->5 -e syntax OK