Je veux télécharger une liste d'utilisateurs du serveur LDAP de mon travail pour télécharger dans notre wiki en tant que répertoire d'entreprise. Comment puis-je télécharger une liste d'utilisateurs à partir d'un serveur LDAP à l'aide de Perl?Comment puis-je télécharger une liste d'utilisateurs à partir d'un serveur LDAP en utilisant Perl?
Merci.
Utilisez le module NET::LDAP.
Un petit exemple de la POD:
use Net::LDAP;
$ldap = Net::LDAP->new('ldap.bigfoot.com') or die "[email protected]";
$mesg = $ldap->bind ; # an anonymous bind
$mesg = $ldap->search(# perform a search
base => "c=US",
filter => "(&(sn=Barr) (o=Texas Instruments))"
);
$mesg->code && die $mesg->error;
foreach $entry ($mesg->entries) { $entry->dump; }
$mesg = $ldap->unbind; # take down session
ce paramètre dois-je mettre sur le ldap- de $> recherche() pour obtenir tous les utilisateurs du serveur? – lamcro
qui dépend uniquement de la configuration de votre serveur. –
J'ai quelques problèmes avec le code basé sur l'exemple ci-dessus. Il semblait que ça fonctionnait, mais j'ai réalisé que ma connexion de liaison échouait. Ensuite, il est par défaut anonyme. Y at-il une variable de débogage que l'on peut utiliser pour s'assurer de sa connexion? –