c:\@Work\Perl\monks>perl -wMstrict -le
"$[ = 1;
 ;;
 my @ra = qw(zero one two three);
 ;;
 print scalar @ra;
 print 0 + @ra;
 print $ra[ (scalar @ra) - 1 ];
 print $ra[         @ra  - 1 ];
 print $ra[         @ra      ];
 print $ra[  -1  ];
 print $ra[ $#ra ];
"
Use of assignment to $[ is deprecated at -e line 1.
4
4
two
two
three
three
three