Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Ldap Group membership

by Anonymous Monk
on May 23, 2005 at 14:01 UTC ( #459565=perlquestion: print w/ replies, xml ) Need Help??
Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

hey all, i am trying to write a perl script that will pull all the members of a group in ldap. Does anyone have a starting point?

Comment on Ldap Group membership
Re: Ldap Group membership
by robartes (Priest) on May 23, 2005 at 14:06 UTC
    Use Net::LDAP to do a search for all the member attritubes in the group. That should get you started well enough.

    CU
    Robartes-

Re: Ldap Group membership
by g0n (Priest) on May 23, 2005 at 14:10 UTC
    Have a look at Net::LDAP. The code will look something like:

    use strict; use Net::LDAP; my $ldap = Net::LDAP->new($ldaphost); my $result = $ldap->search( base=>$groupdn,filter=>'(objectclass=*)',a +ttrs=>['member']); if ($result->code) { print $result->error."\n"; exit 1; } my $entry = $result->entry; my @members = $entry->get('member');

    Warning: Not tested.

    Update: added an error check.

    --------------------------------------------------------------

    g0n, backpropagated monk

      Why would someone post something that is not tested? Does it helps anyone?
Re: Ldap Group membership
by reasonablekeith (Deacon) on May 23, 2005 at 14:20 UTC
    You could have also typed 'LDAP' in the search box and clicked search ;-)
    ---
    my name's not Keith, and I'm not reasonable.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (6)
As of 2014-12-20 12:12 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (95 votes), past polls