diff --git a/pandora_agents/pc/tentacle_client b/pandora_agents/pc/tentacle_client index d0676164ea..02e71e6161 100644 --- a/pandora_agents/pc/tentacle_client +++ b/pandora_agents/pc/tentacle_client @@ -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, ); } diff --git a/pandora_agents/shellscript/linux/tentacle_client b/pandora_agents/shellscript/linux/tentacle_client index d0676164ea..02e71e6161 100755 --- a/pandora_agents/shellscript/linux/tentacle_client +++ b/pandora_agents/shellscript/linux/tentacle_client @@ -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, ); } diff --git a/pandora_agents/shellscript/mac_osx/tentacle_client b/pandora_agents/shellscript/mac_osx/tentacle_client index d0676164ea..02e71e6161 100755 --- a/pandora_agents/shellscript/mac_osx/tentacle_client +++ b/pandora_agents/shellscript/mac_osx/tentacle_client @@ -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, ); } diff --git a/pandora_agents/unix/tentacle_client b/pandora_agents/unix/tentacle_client index 127c3f295f..0cf131c1f9 100755 --- a/pandora_agents/unix/tentacle_client +++ b/pandora_agents/unix/tentacle_client @@ -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, ); }