my $i = 4;               # $i  @stack
                         # --  -------
padsv($i);               #  4  $i
const(0);                #  4  $i,0
add();                   #  4  4
padsv($i);               #  4  4,$i
const(3);                #  4  4,$i,3
plus_equal();            #  7  4,7
const(1);                #  7  4,7,1
minus();                 #  7  4,6
range();                 #  7  4,5,6

say join ', ', @stack;   # "4, 5, 6"