如何通过代理ldap连接到ldap？

Question

我有个小问题。在工作中，我们不久将使用代理ldap连接到ldap。

但是，我的perl脚本用于直接连接到ldap，而且我无法找到通过ldap代理连接到ldap的正确方法。

ldap团队告诉我，只需通过代理的url更改"my.local.ldap.org“即可。

但是，当我这样做时，除了“无法联系myscript.pl X行的DATA>服务器，行403”之外，什么也得不到。

由于我对perl非常陌生，所以我已经束手无策了。

如何通过ldap代理连接到ldap并获取数据？

这是我的perl代码：

#!/usr/bin/perl

use warnings;
use strict;
use Net::LDAP;
use Net::SMTP;
use MIME::Lite;
use Getopt::Std;

connect_ldap();

sub connect_ldap {

    my @attributs = qw(uid subsidiary preferredLanguage);

    my $ldap = Net::LDAP->new(
        "my.local.ldap.org",
        port => 389
    ) or die open (STDERR, ">&SDTOUT");

    my $mesg = $ldap->bind (
        "cn=app_readonly,ou=account,ou=security,o=oubase",
        password => "mypassword"
    );

    $mesg = $ldap->search(
        base   => "o=oubase",
        scope => "sub",
        filter => "(&(objectclass=inetOrgPerson)(|(subsidiary=sub1)(subsidiary=sub2))(role=id=app_access,id=APP,*))",
        attrs => [ @attributs ]
    );

 printf "COUNT : %s\n", $mesg->count;
foreach my $entry ($mesg->entries) {
$entry->dump;
 }
print "==========================================\n";

        $mesg = $ldap->unbind;
        $ldap->unbind;

    }

Answer 1

通常，只要LDAP代理正确设置，通过代理进行连接(只要它是LDAP代理)与直接连接到LDAP服务器没有任何区别。您是否尝试过向代理的主机/端口发送telnetting以查看是否获得了正确的连接信息？