Help for this page

Select Code to Download


  1. or download this
    my @elements = qw/ 0 1 2 3 4 5 6 7 8 9 /;
    
    ...
    #   $[ = $a;  # reset
    #   print $elements[1], "\n";
    
  2. or download this
    1
    0
    1