Re^2: Foreach Loops

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

Comment on Re^2: Foreach Loops Download Code

Replies are listed 'Best First'.
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
My mistake - forgotten s/.$/n/ after "not so clear"	[reply]