$ perl -MO=Concise -e'my $x; my $x; my $y;' 2>&1 | grep padsv
3     <0> padsv[$x:1,4] vM/LVINTRO ->4
5     <0> padsv[$x:2,4] vM/LVINTRO ->6
7     <0> padsv[$y:3,4] vM/LVINTRO ->8