Select Code to Download

c:\@Work\Perl\monks>perl -wMstrict -le
"my @arr = (1,2,3,5,10,3,4,300,1,2,-2);
...
 print qq{i of largest == $i (\@arr[$i] == $arr[$i])};
"
i of largest == 7 (@arr[7] == 300)