| line |
true |
false |
branch |
|
64
|
0 |
21 |
if %args
|
|
65
|
0 |
21 |
unless $self->{'protocol'} =~ /^https?$/
|
|
88
|
0 |
10 |
unless $self->{'bucket'}
|
|
129
|
1 |
4 |
$_[1] ? :
|
|
179
|
0 |
1 |
unless my($y, $m, $d, $hour, $min, $sec) = $initiated =~ /^(\d{4})\-(\d{2})\-(\d{2})T(\d{2}):(\d{2}):(\d{2})/
|
|
245
|
0 |
2 |
unless $self->{'bucket'}
|
|
252
|
1 |
1 |
$content_type ? :
|
|
261
|
0 |
2 |
unless $upload_id
|
|
359
|
0 |
5 |
unless $self->{'bucket'}
|
|
369
|
1 |
4 |
if (defined $first)
|
|
376
|
1 |
4 |
if ($http_response->code == 404 and $http_response->decoded_content =~ m[<Code>NoSuchKey</Code>]) { }
|
|
|
1 |
3 |
elsif (&is_error(scalar $http_response->code)) { }
|
|
385
|
1 |
2 |
if (defined $first)
|
|
387
|
0 |
1 |
unless my($f, $l, $total) = $range =~ m[bytes (\d+)\-(\d+)/(\d+)]
|
|
392
|
3 |
0 |
if ($etag)
|
|
420
|
0 |
4 |
unless $self->{'bucket'}
|
|
430
|
1 |
3 |
if ($http_response->code == 404) { }
|
|
|
1 |
2 |
elsif (&is_error(scalar $http_response->code)) { }
|