Help for this page

Select Code to Download

Select or download this

$ perl -e'@a=qw(a b c); print "$#a\n"; $[=3; print "$#a\n"'
2
5