Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery

Re: multiple local vars in a foreach loop

by roboticus (Chancellor)
on Jan 31, 2013 at 11:21 UTC ( #1016292=note: print w/ replies, xml ) Need Help??

in reply to multiple local vars in a foreach loop


Update: LanX is (of course) correct.

Not with foreach, but you can do it using while and each:

my %hash; while (my ($key, $value) = each %hash) { ... }


When your only tool is a hammer, all problems look like your thumb.

Comment on Re: multiple local vars in a foreach loop
Select or Download Code
Replies are listed 'Best First'.
Re^2: multiple local vars in a foreach loop
by LanX (Chancellor) on Jan 31, 2013 at 11:28 UTC
    Right answer to wrong question! ;-)

    DB<156> while (my ($key, $value) = each @a) { print "$key, $value" } +;; Type of arg 1 to each must be hash (not array dereference) at (eval 13 +5)[] line 2, near "@a) "

    Cheers Rolf

      Depends on the version of Perl: each.
      لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ
        Unfortunately not! :(

        This doesn't help splicing multiple loop vars...


        it will also return the index and value for the next element of an array so that you can iterate over it;

        Wrong answer wrong question! ;-)

        Cheers Rolf

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (8)
As of 2015-12-01 10:45 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (798 votes), past polls