Select Code to Download

for i = 1 to 10
myarray(i) = myarray(i) + 1
next i

my $i;
my @array = (1, 5, 6, 9, 57);
...
{
    ++$array[$i];
}

foreach $bar(@bar)
{
    ++$bar;
}