| line | % | coverage | branch |
|---|
| 61 | 50 | T | F | if (my $proxy = $self->proxy) |
| 63 | 0 | T | F | unless $port |
| 73 | 0 | T | F | unless shift(@_)->SUPER::timeout |
| 82 | 50 | T | F | if ($@) |
| 88 | 50 | T | F | if (my $rv = *$self->{'ssl_ctx'}->set_verify) |
| 92 | 50 | T | F | if ($self->proxy) { } |
| 95 | 0 | T | F | if (not $proxy_connect or $@) |
| 100 | 50 | T | F | @_ == 1 ? : |
| 101 | 50 | T | F | if (not $self->SUPER::connect(@_)) |
| 118 | 0 | T | F | if alarm_ok |
| 125 | 0 | T | F | if ($rv <= 0) |
| 126 | 0 | T | F | if alarm_ok |
| 129 | 0 | T | F | if (*$self->{'ssl_version'} == 23) { } |
| 0 | T | F | elsif (*$self->{'ssl_version'} == 3) { } |
| 148 | 0 | T | F | if alarm_ok |
| 152 | 0 | T | F | if ($@) |
| 209 | 0 | T | F | if $errs ne '' |
| 227 | 0 | T | F | if alarm_ok |
| 229 | 0 | T | F | if not defined $n |
| 230 | 0 | T | F | if alarm_ok |
| 240 | 0 | T | F | if not defined $n |
| 271 | 0 | T | F | unless defined $n |
| 316 | 0 | T | F | unless @stack |
| 319 | 0 | T | F | unless ref $stack_object |
| 320 | 0 | T | F | if ($stack_object->isa('LWP::UserAgent')) |
| 343 | 0 | T | F | unless $iaddr |
| 344 | 0 | T | F | unless $port |
| 346 | 0 | T | F | unless $self->SUPER::connect($port, $iaddr) |
| 350 | 0 | T | F | unless $peer_port |
| 351 | 0 | T | F | unless $peer_addr |
| 354 | 0 | T | F | if ($ENV{'HTTPS_PROXY_USERNAME'} or $ENV{'HTTPS_PROXY_PASSWORD'}) { } |
| 367 | 0 | T | F | if ($lwp_object and $lwp_object->agent) |
| 375 | 0 | T | F | if ($header =~ m[HTTP/\d+\.\d+\s+200\s+]is) |
| 379 | 0 | T | F | unless ($conn_ok) |
| 392 | 50 | T | F | if $proxy_server |
| 394 | 50 | T | F | unless $proxy_server |
| 408 | 50 | T | F | if ($file) |
| 409 | 0 | T | F | unless -e $file |
| 411 | 0 | T | F | if (/PKCS12/) { } |
| 0 | T | F | elsif (/CERT/) { } |
| 0 | T | F | elsif (/KEY/) { } |
| 413 | 0 | T | F | unless $ctx->use_pkcs12_file($file, $ENV{'HTTPS_PKCS12_PASSWORD'}) |
| 416 | 0 | T | F | unless $ctx->use_certificate_file($file, 1) |
| 418 | 0 | T | F | unless $ctx->use_PrivateKey_file($file, 1) |
| 426 | 50 | T | F | if ($count == 2) |
| 427 | 0 | T | F | if (not $ctx->check_private_key) |