foreach ($i=0; $i <= (scalar(@array)-1); ++$i)
{
    ++$array[$i];
}

##</code><code>##


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