On Thu, 11 Dec 2003, D.Kreft did scribble:
As a follow-up to my own question, I have managed to unearth my ssl options,
but through purely evil means:
my $socket = $ldap->socket();
my $socket_hash = \%{*$socket};
print Dumper $socket_hash->{'_SSL_arguments'};
Which produces this:
$VAR1 = {
'SSL_cert_file' => undef,
'SSL_cipher_list' => 'DES-CBC3-SHA:RC4-MD5',
'SSL_server' => 0,
'SSL_use_cert' => 0,
'SSL_passwd_cb' => undef,
'SSL_key_file' => undef,
'SSL_ca_file' => '',
'SSL_version' => 'tlsv1',
'SSL_ca_path' => '/my/ca_path',
'SSL_verify_mode' => '3'
};
But, of course, this is *not* what I want to do when it comes time to
construct a new Net::LDAP object.
-dan
