Re: 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";
    }
[download]

Bill

Comment on Re: Trying to access array within hash Select or Download Code

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";`	[reply] [d/l]
Re^3: Trying to access array within hash by LanX (Saint) on Jun 04, 2013 at 14:16 UTC
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.)` [download] Are you the Hound or the Mountain? ;-) Cheers Rolf ( addicted to the Perl Programming Language)	[reply] [d/l] [select]