Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses

Re^4: Hash of arrays

by perlloz (Initiate)
on Dec 28, 2012 at 07:45 UTC ( #1010661=note: print w/ replies, xml ) Need Help??

in reply to Re^3: Hash of arrays
in thread Hash of arrays

Sorry, new here, I used the print statements from the previous posters suggestions. The actual data being pushed into the HOA is a lot of code and is an AD query so it wouldn't compile. What I end up with is a key of Bob and an array containing groups: domain users, testing, server team etc

push (@{$newgrouphash{"$newdn"} },"$newgroup"); foreach $newdn (sort keys %newgrouphash ) { print "Name:$newdn\n\t"; foreach $group ( sort @{$newgrouphash{$newdn}} ) { + if (!($group =~ /CN=Domain Users/i)) { # print "$group, "; + $res = `dsmod group $group -rmmbr \"$newdn\"`; + print "$res\n";

Comment on Re^4: Hash of arrays
Download Code
Replies are listed 'Best First'.
Re^5: Hash of arrays
by Anonymous Monk on Dec 28, 2012 at 07:47 UTC
    Data Dumper Data Dumper Dumps the Data so the problem of accessing the HoA is seperated from populating the HoA

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (3)
As of 2015-11-29 02:34 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 (746 votes), past polls