Hi All,
I want to connect to my Active Directory using perl and read all the entries in
it...but i am getting an error...
C:\>perl test.pl
Error LDAP_INVALID_CREDENTIALS at d.pl line 15, <DATA> line 450.
---------------------------------------test.pl------------------------------------------------------------
#!/usr/bin/perl
use strict;
use Net::LDAP;
use Net::LDAP::Util qw(ldap_error_text
ldap_error_name
ldap_error_desc
);
my $ad = Net::LDAP->new("ldap://204.71.111.140:389";) or die "$@";
my
$mesg=$ad->bind("cn=chitmank,OU=Users,ou=Bangalore,dc=cwgoindia,dc=com",password=>"[EMAIL
PROTECTED]");
die "Error ",ldap_error_name($mesg) if $mesg->code;
$ad->unbind;
print 'Done';
---------------------------------------------------------------------------------------------------
If i try anonymous bind... it works... no error....
Thanks for the help
Regards
Chitman
---------------------------------
Do you Yahoo!?
Check out the new Yahoo! Front Page. www.yahoo.com
