[perl-ldap-checkins] CVS: ldap/lib/Net/LDAP FAQ.pod,1.20,1.21

[Clif H. <ch...@us...>]

Update of /cvsroot/perl-ldap/ldap/lib/Net/LDAP
In directory usw-pr-cvs1:/tmp/cvs-serv957/ldap/lib/Net/LDAP

Modified Files:
	FAQ.pod 
Log Message:

Added text about simulated server failover.



Index: FAQ.pod
===================================================================
RCS file: /cvsroot/perl-ldap/ldap/lib/Net/LDAP/FAQ.pod,v
retrieving revision 1.20
retrieving revision 1.21
diff -u -d -r1.20 -r1.21
--- FAQ.pod	2001/08/26 22:16:32	1.20
+++ FAQ.pod	2001/12/17 16:50:59	1.21
@@ -1031,6 +1031,23 @@
 
   print ldap_error_name($result->code);
 
+=head2 How can I simiulate server failover.
+
+Perl-LDAP does not do server failover, however there are several
+programming options for getting around this situation.
+
+Here is one possible solution.
+
+   unless ( $ldaps =
+            Net::LDAPS->new($ldapserverone,
+                            port=>636,timeout=>5) ) 
+           {
+            $ldaps = Net::LDAPS->new($ldapservertwo,
+                                     port=>636,timeout=>20) || 
+            return 
+            "Can't connect to $ldapserverone or $ldapservertwo via LDAPS: $@";
+           }
+
 =head1 Using X.509 certificates.
 
 =head2 How do I store X.509 certificates in the directory?