As far as I can see, a bind where you set 'noauth'=>1 doesn't tell you whether a user exists with a correct password (testing with Active Directory).
The following always returns "Success" regardless of the DN, but the bind
can't be used for searching.
#!/usr/bin/perl
use strict;
use warnings;
use Net::LDAP;
my $dn = 'AnyOldGarbage';
my $ldapServer = new Net::LDAP('ldap://localhost',
'port' =>'389',
'timeout'=>'2');
my $message= $ldapServer->bind($dn,'noauth'=>1);
print $message->is_error()?"Failure\n":"Success\n";
=========
OpenAsset - Image Management for Architects, Designers & Engineers
Axomic Ltd
http://www.axomic.com
