for ($i = 0; $i < $BLAH; ++$i) { ...}

##</code><code>##

for my $foo (@bar) { . . . }