We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 04810a0 commit f8fedc8Copy full SHA for f8fedc8
1 file changed
lib/LWP/Protocol/http.pm
@@ -43,7 +43,8 @@ sub _new_socket
43
my $status = "Can't connect to $host:$port";
44
if ($@ =~ /\bconnect: (.*)/ ||
45
$@ =~ /\b(Bad hostname)\b/ ||
46
- $@ =~ /\b(certificate verify failed)\b/
+ $@ =~ /\b(certificate verify failed)\b/ ||
47
+ $@ =~ /\b(Crypt-SSLeay can't verify hostnames)\b/
48
) {
49
$status .= " ($1)";
50
}
0 commit comments