Help for this page
Select Code to Download
Select
or
download this
for (my $i = 0; $i < @list; $i ++) { print "$i: $list[$i]\n"; }