i think the point of that last bit was that "foreach" and "for" act differently.

If you look in toke.c, you will see:

        case KEY_for:
        case KEY_foreach:
        ... code here that handles 'for' and 'foreach'
[download]

Do they? According to the camel:

"The foreach keyword is actually a synonym for the for keyword, so you can use foreach for readability or for for brevity."

- p100, Programming Perl, 2nd edition

.02

cLive ;-)

my $var=0;
foreach ($var=1; $var < 10; ++$var){
    print $var;
}
print "\n$var \n";
[download]

it appears that when used with a c style loop for/foreach does not localise the index variable... and for the record I have never written a loop with the index variable other than the normal syntax of for (my $var;... :-)

--
my $chainsaw = 'Perl';

"Well that wasn't the point I was trying to make :)"

I know, but... hmmm.

Getting back to your questions...

Let's rewrite your loop:

my $var=0;
{
  $var=1;
  while ($var < 10) {
    print "$var";
    $var++;
  }
}
print "\n$var \n";
[download]

The for loop adds to $var, then checks condition, then breaks loop. It doesn't say would I break the condition if I added one to $var, so $var is 10.

Also, you don't declare $var as being local to the loop. So, look at this:

my $var=0;
foreach (my $var=1; $var < 10; ++$var){
    print $var;
}
print "\n$var \n";
[download]

Or, as written above:

my $var=0;
{
  my $var=1;
  while ($var < 10) {
    print "$var";
    $var++;
  }
}
print "\n$var \n";
[download]

Seem clearer now?

cLive ;-)