Added SSL_verifycn_name flag to start_SSL in HTTP::Micro to resolve t/lib/HTTP/Micro.t test failure on bookworm

This commit is contained in:
Sveta Smirnova
2024-05-24 16:57:00 +03:00
parent acc0d495d2
commit 31124b1b1e

View File

@@ -233,7 +233,10 @@ sub _split_url {
or croak(qq/Could not binmode() socket: '$!'/);
if ( $scheme eq 'https') {
IO::Socket::SSL->start_SSL($self->{fh});
IO::Socket::SSL->start_SSL(
$self->{fh},
SSL_verifycn_name => $host,
);
ref($self->{fh}) eq 'IO::Socket::SSL'
or die(qq/SSL connection failed for $host\n/);
if ( $self->{fh}->can("verify_hostname") ) {