Problem in Connecting through Net::LDAPS

[BBKing]

Hi all!

I am getting this following error

IO::Socket::SSL: Timeout at ldaps_test.pl line 13, <DATA> line 556.

I have openssl version 0.97a and perl 5.8 and
 following perl modules

Net-SSLeay.pm 1.25
perl ldap 0.29
IO-Socket-SSL-0.95

Also i tried some thing like  Timeout=> '540' didn't work

any insight will be great help, Thanks in advance.

-------------------------------------
#!/usr/bin/perl
use Net::LDAP::Entry;
use Net::LDAP qw(:all);
use IO::Socket;
use Net::LDAP::Util qw(ldap_error_name
      ldap_error_text);

$dn="userdn";
$password="password";
$version=3;


$ldaps = Net::LDAP->new('ldaps://url:636',
                         verify => 'require',
                         capath => '/path/tocert/Dir',
                         Timeout=> '540') or die "$@";
$mesg1 = $ldaps->bind(dn => $dn,
                        password => $password,
                        version => $version);

$ldaperror_code=ldap_error_name($mesg1->code);

print "$ldaperror_code \n";

---------------------------------