RE: My favorite looping mechanism in Perl is:

[Punto]

Well, I come from Pascal, so I don't use those fancy loop things like "foreach", or "map".

If I want to go through an array I do:

for ($i = 0; $i<=$#array; $i++) {
   stuff;
};

I also don't use $_ to get the contents of a file. I do this:

while ($line = <FILE>) {
   stuff;
};

And I put ; at the end of every line..

[BrentDax]

Uh...why?

Personally, I find for-as-foreach more useful:


for my $i(0..$#array) {   #same thing as your C-like for
    stuff;
}

=cut
--Brent Dax


@HPAJ=split("", "rekcaH lreP rentonA tsuJ");
print reverse @HPAJ;  #sucky but who cares?

[Anonymous Monk]

Personally, I find for-as-foreach more useful:

Try make:

for my $i (0 .. $#array) { ... }

efficiently do something like:

for ($i=0; $i < @array; $i += ROWSIZE) { ... }

[jdporter]

oh, you mean like

for my $i ( grep { not $_ % ROWSIZE } 0 .. $#array )