Help for this page

Select Code to Download


  1. or download this
    >perl -MO=Concise -e"($a,$b)=(4,5)"
    a  <@> leave[1 ref] vKP/REFC ->(end)
    ...
    -           <1> ex-rv2sv sKRM*/1 ->-
    8              <#> gvsv[*b] s ->9
    -e syntax OK
    
  2. or download this
    >perl -MO=Concise -e"1 for ($a,$b)"
    d  <@> leave[1 ref] vKP/REFC ->(end)
    ...
    -                 <0> ex-const v ->9
    9                 <0> unstack v ->a
    -e syntax OK