Help for this page

Select Code to Download


  1. or download this
    >perl -wMstrict -le
"$[ = 100;  my @ra = qw(a b c d e f);
 print '$[: ', $[, '  -1: ', $ra[-1], '  $#: ', $ra[$#ra];"
$[: 100  -1: f  $#: f
  2. or download this
    $[: 100  -1: f  $#: f
$[: 1  -1: f  $#: f
...
$[: -12  -1: f  $#:
Use of uninitialized value in print at -e line 1.
$[: -99  -1: f  $#: