获得500个握手错误:超过https 443。我要发送XML的主机服务不支持TLS 1.2,它们支持1.0和1.1。目前在CentOS 6上使用LWP 6.03。
use LWP::UserAgent;
$ua = LWP::UserAgent->new(ssl_opts => { verify_hostname => 0,SSL_version => 'SSLv23:!TLSv12' });
$req = HTTP::Request->new(GET => 'https://secure-host-server');
$res = $ua->request($req);
if ($res->is_success) {
print $res->content;
} else {
print "Error: " . $res->status_line . "\n";
}在将TLS版本发送到主机时,是否可以打印它?我能做些什么来验证我正在使用TLS1.1吗?
发布于 2013-11-30 21:03:12
通过LWP::UserAgent设置SSL_version将无法工作。我尝试了无数的方法试图让我的代码通过TLSv1发送XML,而没有运气,下面的代码成功了。
use Net::SSLGlue::LWP;
use IO::Socket::SSL;
my $context = new IO::Socket::SSL::SSL_Context(
SSL_version => 'tlsv1',
SSL_verify_mode => Net::SSLeay::VERIFY_NONE(),
);
IO::Socket::SSL::set_default_context($context);
use LWP::UserAgent;
use HTTP::Request::Common;https://stackoverflow.com/questions/20293860
复制相似问题