That's a really thin line to walk -- thin enough that I think it's almost meaningless and definitely more confusing than useful. Is this a for loop?
foreach ( my $i = 0; $i < 10 ; $i++ )
print "\$i is $i\n";
Is this a foreach loop?
for my $user (@names)
print "Found user $user\n";