SSL_verify_mode must be a number.

This commit is contained in:
Ramon Novoa 2017-02-24 16:39:05 +01:00
parent c6bc284b21
commit 6a2833b9a4
4 changed files with 9 additions and 9 deletions

View File

@ -385,7 +385,7 @@ sub start_ssl {
SSL_passwd_cb => sub {return $t_ssl_pwd},
SSL_use_cert =>'1',
# No authentication
SSL_verify_mode => '0x00',
SSL_verify_mode => 0x00,
);
}
else {
@ -397,7 +397,7 @@ sub start_ssl {
SSL_passwd_cb => sub {return $t_ssl_pwd},
SSL_use_cert =>'1',
# Verify peer
SSL_verify_mode => '0x01',
SSL_verify_mode => 0x01,
);
}

View File

@ -385,7 +385,7 @@ sub start_ssl {
SSL_passwd_cb => sub {return $t_ssl_pwd},
SSL_use_cert =>'1',
# No authentication
SSL_verify_mode => '0x00',
SSL_verify_mode => 0x00,
);
}
else {
@ -397,7 +397,7 @@ sub start_ssl {
SSL_passwd_cb => sub {return $t_ssl_pwd},
SSL_use_cert =>'1',
# Verify peer
SSL_verify_mode => '0x01',
SSL_verify_mode => 0x01,
);
}

View File

@ -385,7 +385,7 @@ sub start_ssl {
SSL_passwd_cb => sub {return $t_ssl_pwd},
SSL_use_cert =>'1',
# No authentication
SSL_verify_mode => '0x00',
SSL_verify_mode => 0x00,
);
}
else {
@ -397,7 +397,7 @@ sub start_ssl {
SSL_passwd_cb => sub {return $t_ssl_pwd},
SSL_use_cert =>'1',
# Verify peer
SSL_verify_mode => '0x01',
SSL_verify_mode => 0x01,
);
}

View File

@ -407,7 +407,7 @@ sub start_ssl {
if ($t_ssl_cert eq ''){
IO::Socket::SSL->start_SSL (
$t_socket,
SSL_verify_mode => '0x00',
SSL_verify_mode => 0x00,
);
}
elsif ($t_ssl_ca eq '') {
@ -418,7 +418,7 @@ sub start_ssl {
SSL_passwd_cb => sub {return $t_ssl_pwd},
SSL_use_cert =>'1',
# No authentication
SSL_verify_mode => '0x00',
SSL_verify_mode => 0x00,
);
}
else {
@ -430,7 +430,7 @@ sub start_ssl {
SSL_passwd_cb => sub {return $t_ssl_pwd},
SSL_use_cert =>'1',
# Verify peer
SSL_verify_mode => '0x01',
SSL_verify_mode => 0x01,
);
}