use DBI;
$dbh = DBI->connect("DBI:LDAP:ldapdb",'user','password')
or die "Cannot connect as user: " . $DBI::errstr;
$dbh = DBI->connect("DBI:LDAP:ldapdb") #ANONYMOUS
or die "Cannot connect as guest (readonly): " . $DBI::errstr;
Updated: You might also want to look at ResourcePool, which specifically calls out Net::LDAP connection caching as a target use.
The intelligent reader will judge for himself. Without examining the facts fully and fairly, there is no way of knowing whether vox populi is really vox dei, or merely vox asinorum. -- Cyrus H. Gordon
|