Re: Looping backwards through two arrays at once?

"Perl-style" for loop:

for my $i (reverse 0..$#a) {
   print("$a[$i], $b[$i]\n");
}
[download]

"C-style" for loop:

for (my $i=@a; $i--; ) {
   print("$a[$i], $b[$i]\n");
}
[download]

Update: Fixed crossed wires.

Comment on Re: Looping backwards through two arrays at once? Select or Download Code

Replies are listed 'Best First'.
Re^2: Looping backwards through two arrays at once? by Limbic~Region (Chancellor) on Nov 04, 2005 at 17:14 UTC
ikegami, Your suggestion of a C style for loop as an alternative feels odd to me. I would have written it as a while loop as it feels more natural. `my $i = @array; while ( $i-- ) { # ... }` [download] Cheers - L~R	[reply] [d/l]
Re^3: Looping backwards through two arrays at once? by ikegami (Patriarch) on Nov 04, 2005 at 17:37 UTC
I prefer `for` over `while` because the index is scoped to the loop, and I find it more readable since the bounds of the loop are on a single line.	[reply] [d/l] [select]
Re^2: Looping backwards through two arrays at once? by kutsu (Priest) on Nov 04, 2005 at 17:19 UTC
umm....don't you mean `for my $i (reverse 0 .. $#a)` on the first example? Update: Already corrected it, it seems :). "Cogito cogito ergo cogito sum - I think that I think, therefore I think that I am." Ambrose Bierce	[reply] [d/l]
Re^2: Looping backwards through two arrays at once? by holli (Abbot) on Nov 04, 2005 at 19:03 UTC
From the belly I would have said that `for my $i (reverse 0..$#a)` [download] would cast the list into existance, but as it seems that isn't the case (Perl 5.8). holli, /regexed monk/	[reply] [d/l]
Re^3: Looping backwards through two arrays at once? by ikegami (Patriarch) on Nov 04, 2005 at 19:07 UTC
Actually, it does cast the list into existance, even in 5.8. I mentioned this elsewhere in this thread. This thread has a discussion on this issue.	[reply]