Re: Foreach Loops

Not so clean:

for(0..@arr){ $arr[$_] }
[download]

Update:

for(1..@arr){ print $arr[--$_], $_,  $/ } # diff ?
[download]

Comment on Re: Foreach Loops Select or Download Code

Replies are listed 'Best First'.
Re^2: Foreach Loops by samtregar (Abbot) on Mar 15, 2005 at 19:42 UTC
And not so right. You're off by one! `$ perl -e '@a = (1, 2, 3); for (0..@a) { print "A$_: $a[$_]\n" }' A0: 1 A1: 2 A2: 3 A3:` [download] -sam	[reply] [d/l]
Re^3: Foreach Loops by sh1tn (Priest) on Mar 15, 2005 at 20:00 UTC
That's why I said "Not so clear": `for(1..@arr){ print $arr[--$_], $_, $/ }` [download]	[reply] [d/l]
Re^4: Foreach Loops by samtregar (Abbot) on Mar 15, 2005 at 20:44 UTC
Actually you said "not so clean" not "not so clear" and your code didn't start from 1. -sam	[reply]
Re^5: Foreach Loops by sh1tn (Priest) on Mar 15, 2005 at 20:54 UTC