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