Help for this page

Select Code to Download


  1. or download this
    $ perl -MO=Concise -e'1+1'
    3  <@> leave[1 ref] vKP/REFC ->(end)
    1     <0> enter ->2
    2     <;> nextstate(main 1 -e:1) v:{ ->3
    -     <0> ex-const v ->3
    
  2. or download this
    $ perl -MO=Concise -e'$a=1+$a'
    8  <@> leave[1 ref] vKP/REFC ->(end)
    ...
    4              <$> gvsv(*a) s ->5
    -        <1> ex-rv2sv sKRM*/1 ->7
    6           <$> gvsv(*a) s ->7