| line |
true |
false |
branch |
|
69
|
19 |
2 |
if ($header =~ s/^\s*(OAuth|Bearer)\s+([^\s\,]*)//) |
|
75
|
1 |
20 |
if ($header) |
|
123
|
2 |
8 |
if (defined $headers) { } |
|
124
|
2 |
0 |
if (ref $headers eq 'ARRAY') { } |
|
133
|
1 |
9 |
if @pairs > 0 |
|
136
|
6 |
4 |
if ($method eq 'GET' or $method eq 'DELETE') { } |
|
142
|
2 |
2 |
unless ($headers->header('Content-Type')) |
|
147
|
2 |
2 |
$content_type eq 'application/x-www-form-urlencoded' ? : |
|
192
|
40 |
8 |
unless defined $header |
|
195
|
4 |
4 |
if ($header =~ /\A\s*(Basic)\s([^\s\,]*)/) |
|
197
|
2 |
2 |
unless index($decoded, ':') > 0 |
|
200
|
0 |
2 |
unless scalar @split_credentials == 2 |