1

LDAPサーバーに問題が見つかりました。perlスクリプトでバインドできません。スクリプトは次のとおりです。

use strict;
use Net::LDAP;

my $ldap = "";
$ldap = Net::LDAP->new("iis.aulia.net");
my $mesg = "";
$mesg = $ldap->bind("CN=app-audev-adpead,OU=Applications,OU=Special,OU=Users
,OU=FRA,DC=iis,DC=aulia,DC=net", password => "=3\6dsdKDsH30z&B/'Bub00");

die $mesg->error() if $mesg->code();
$mesg = $ldap->unbind;

それはいつも私を示しています:

80090308:LdapErr:DSID-0C0903A9、コメント:AcceptSecurityContextエラー、データ52e、search.pl行16、行522のv1db1

後に間違った組み合わせを入れ$mesg = $ldap->bindますか?それ"CN=app-audev-adpead"は私のLDAPサーバーユーザーログインであり、それと同じ形式で書かれています。

4

1 に答える 1

8

あなたのエラーで

80090308:LdapErr:DSID-0C0903A9、コメント:AcceptSecurityContextエラー、データ52e、search.pl行16、行522のv1db1

このページによる「データ52e」は「無効な資格情報」です。

おそらく\6、二重引用符で囲まれた文字列を使用して、バックスラッシュと6を表すのではなく、6をエスケープしようとします。したがって、次のように変更します。

password => q(=3\6dsdKDsH30z&B/'Bub00)

一重引用符q()は補間を回避します。たとえば、引用符で囲む文字列に一致するように区切り文字を変更できますq!foo(bar)!

また、バインド文字列に改行がありますが、これは重要な場合と重要でない場合があります。

補足として:あなたは本当にあなたのログイン情報をここに投稿するべきですか?

于 2013-03-19T12:11:28.810 に答える