Re^3: My favorite looping mechanism in Perl is:

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

Try make:

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

efficiently do something like:

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

Comment on Re^3: My favorite looping mechanism in Perl is: Select or Download Code

Replies are listed 'Best First'.
Re^4: My favorite looping mechanism in Perl is: by jdporter (Paladin) on Jun 25, 2012 at 00:35 UTC
oh, you mean like `for my $i ( grep { not $_ % ROWSIZE } 0 .. $#array )` [download]	[reply] [d/l]
Re^5: My favorite looping mechanism in Perl is: by sauoq (Abbot) on Jun 25, 2012 at 21:29 UTC
That would do ROWSIZE mods and ROWSIZE comparisons plus some other junk in place of a single addition. `-sauoq "My two cents aren't worth a dime.";`	[reply]
Re^5: My favorite looping mechanism in Perl is: by Anonymous Monk on Jun 25, 2012 at 13:54 UTC
Yes. using foreach you have to do something terribly contorted and crazily inefficient. Like that. Thank you for so adeptly illustrating my point.	[reply]