Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Re: Foreach Loops

by sh1tn (Priest)
on Mar 15, 2005 at 19:26 UTC ( #439727=note: print w/ replies, xml ) Need Help??


in reply to Foreach Loops

Not so clean:

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



Comment on Re: Foreach Loops
Select or Download Code
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:

    -sam

      That's why I said "Not so clear":
      for(1..@arr){ print $arr[--$_], $_, $/ }


        Actually you said "not so clean" not "not so clear" and your code didn't start from 1.

        -sam

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://439727]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (5)
As of 2014-09-18 22:20 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (125 votes), past polls