$ perl -MO=Concise,-exec, -E '$a = []; $b = 5'
1 <0> enter v
2 <;> nextstate(main 2 -e:1) v:%,us,{,fea=7
3 <0> pushmark s
4 <@> anonlist sK*
5 <#> gvsv[*a] s
6 <2> sassign vKS/2
7 <;> nextstate(main 2 -e:1) v:%,us,{,fea=7
8 <$> const[IV 5] s
9 <#> gvsv[*b] s
a <2> sassign vKS/2
b <@> leave[1 ref] vKP/REFC
####
my @args; $args[0] = anonlist();
##
##
$args[0] = 1;