كيف يمكنني تحميل قائمة المستخدمين من خادم LDAP باستخدام بيرل؟

Question

وأريد لتحميل قائمة المستخدمين من خادم LDAP عملي لتحميل في ويكي لدينا كدليل الشركة. كيف يمكنني تحميل قائمة المستخدمين من خادم LDAP باستخدام بيرل؟

وشكرا.

Answer 1

واستخدم NET :: LDAP وحدة .

وهناك مثال بسيط من POD :

use Net::LDAP;

$ldap = Net::LDAP->new( 'ldap.bigfoot.com' ) or die "$@";

$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