Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

Re: Trying to access array within hash

by BillKSmith (Priest)
on Jun 04, 2013 at 12:37 UTC ( #1036965=note: print w/replies, xml ) Need Help??

in reply to Trying to access array within hash

You can further simplify ig's solution with values instead of keys in the foreach and with interpolation in the print.
foreach my $policy (values %policies) { my $polMembers = $policy->[ (lc($targetRole) eq "source") ? 2 +: 4 ]; local $" = "\n"; print "@$polMembers\n"; }

Replies are listed 'Best First'.
Re^2: Trying to access array within hash
by clegane (Novice) on Jun 04, 2013 at 13:47 UTC

    Thanks a bunch everyone. I got it working with Bill's solution. The reason I was copying the array is because the syntax was getting ugly, and I wasn't sure how to get things working. In Bill's solution, what does this line do exactly?

    local $" = "\n";
      see $" in perlvar

      $LIST_SEPARATOR $" This is like $, except that it applies to array and sli +ce values interpolated into a double-quoted string (or sim +ilar interpreted string). Default is a space. (Mnemonic: o +bvious, I think.)

      Are you the Hound or the Mountain? ;-)

      Cheers Rolf

      ( addicted to the Perl Programming Language)

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1036965]
[Corion]: Ooh, yes, yay ;-D
[Discipulus]: my backpack is ready for two nights in the mountains!
[Corion]: Discipulus: In the mountains during winter?
[choroba]: SHAttered

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (6)
As of 2017-02-24 09:04 GMT
Find Nodes?
    Voting Booth?
    Before electricity was invented, what was the Electric Eel called?

    Results (353 votes). Check out past polls.