| line |
true |
false |
branch |
|
28
|
8 |
11 |
if (my $auth = $driver->config("auth")) |
|
29
|
1 |
7 |
if $auth->{'scheme'} ne "basic" |
|
33
|
5 |
9 |
if utf8::is_utf8($_) |
|
42
|
17 |
1 |
$version ? : |
|
49
|
3 |
15 |
if ($uri->scheme eq 'https') { } |
|
51
|
1 |
2 |
if $unencrypted |
|
53
|
1 |
1 |
if (defined(my $trust_ca = $driver->config("trust_ca"))) |
|
54
|
1 |
0 |
unless open my $fh, "<", $trust_ca |
|
59
|
2 |
13 |
if $driver->config("encrypted") |
|
101
|
3 |
10 |
if (!$header->{'success'} && $response->header('Client-Warning') // Deparse error: Can't locate object method "object_2svref" via package "B::SPECIAL" at /usr/local/lib/perl5/5.26.1/B/Deparse.pm line 5018.
) |
|
111
|
126 |
470 |
unless defined $self->{'buffer'} |
|
129
|
3 |
3 |
if ($json) { } |
|
133
|
2 |
1 |
$mode ? : |