如何使用Perl从LDAP服务器下载用户列表？

发布时间：2020-12-15 23:21:22 所属栏目：大数据来源：网络整理

导读：我想从我工作的LDAP服务器上传用户列表,以作为公司目录上传到我们的wiki. 如何使用Perl从LDAP服务器下载用户列表？谢谢. 解决方法使用 NET::LDAP模块. POD的一个小例子： use Net::LDAP;$ldap = Net::LDAP-new( 'ldap.bigfoot.com' ) or die "$@";$mesg =

我想从我工作的LDAP服务器上传用户列表,以作为公司目录上传到我们的wiki.
如何使用Perl从LDAP服务器下载用户列表？

谢谢.

解决方法

使用 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

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!