Branch Coverage

blib/lib/LWP/Protocol/https.pm
Criterion Covered Total %
branch 10 24 41.6


line true false branch
19 0 10 unless $self->{'ua'}{'ssl_opts'}
20 6 4 if (delete $ssl_opts{'verify_hostname'}) { }
25 0 4 if ($Net::HTTPS::SSL_SOCKET_CLASS eq 'Net::SSL') { }
31 6 4 if ($ssl_opts{'SSL_verify_mode'})
32 0 0 unless (exists $ssl_opts{'SSL_ca_file'} or exists $ssl_opts{'SSL_ca_path'})
33 0 0 if ($Net::HTTPS::SSL_SOCKET_CLASS eq 'IO::Socket::SSL' and defined &IO::Socket::SSL::default_ca and IO::Socket::SSL::default_ca()) { }
0 0 elsif (my $cafile = eval { do { require Mozilla::CA; Mozilla::CA::SSL_ca_file() } }) { }
75 8 0 if ($sock->can("get_sslversion") and my $sslversion = $sock->get_sslversion)
80 8 0 if ($cert)
84 8 0 if (not $self->{'ssl_opts'}{'SSL_verify_mode'}) { }
0 0 elsif (not $self->{'ssl_opts'}{'SSL_verifycn_scheme'}) { }
104 0 6 unless $sock