Help for this page

Select Code to Download


  1. or download this
    >perl -e "$a=[120]; for (-1..@{$a}){print qq($_\n)};
       print qq(  \$a=$a    \@a=@{$a}  value=$a->[0]);"
    ...
    0
    1
      $a=ARRAY(0x224f44)    @a=120  value=120
    
  2. or download this
      for(-5..$term->[0])