Using
my @LDAPServerAddress = [ '172.19.1.11', '172.17.17.110' ];
my $ldap = Net::LDAP->new(@LDAPServerAddress,port=>389,timeout=>5)
|| return "Can't connect to @LDAPServerAddress via LDAP";
Works.
-----Original Message-----
From: Edward Brookhouse [mailto:[EMAIL PROTECTED]
Sent: Friday, September 26, 2003 11:32 AM
To: '[EMAIL PROTECTED]'
Subject: Perl-ldap multiple hosts in new
I am attempting to utilize Net::LDAP to authenticate to a directory, and
I have it working, but I now need to add redundancy.
The docs for Net::LDAP say "
HOST may also be a reference to an array of hosts, host-port pairs or
URIs to try. Each will be tried in order until a connection is made.
Only when all have failed will the result of undef be returned. "
If I use:
my $LDAPServerAddress = "172.19.1.10";
my $ldap = Net::LDAP->new($LDAPServerAddress,port=>389,timeout=>5)
|| return "Can't connect to $LDAPServerAddress via LDAP";
This works fine.
Any attempt at making an array out of LDAPServerAddress or even
specifying a list or expanding the my $ldap with an or all fails.
Has anyone done this?
Thanks
Edward B
[EMAIL PROTECTED]
