How is a 'for' loop written in Perl?

How do you write a for loop in Perl?

I've tried the following to no avail:

my $i = 0;
for my $foo; do
    $i = $[i+1];
done < bar;

There are two types of for loop in Perl, in addition to the for statement modifier. They look like this:

# C-style for loop
for ( my $i = 0; $i < 12; ++$i ) {
    ...
}

# Regular for loop
for my $i (0..11) {
    ...
}

# Statement modifier
... for 0..11;