| blib/lib/Amazon/S3Curl/PurePerl.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 2 | 16 | 12.5 |
| line | true | false | branch |
|---|---|---|---|
| 29 | 1 | 0 | if ($@) |
| 96 | 0 | 1 | unless $method |
| 139 | 0 | 0 | if ($url =~ m[/$]) |
| 165 | 0 | 0 | unless @output |
| 166 | 0 | 0 | if $output[0] =~ /200 OK/ |
| 167 | 0 | 0 | if $output[0] =~ /404 Not Found/ |
| 174 | 0 | 0 | unless $self->can($meth) |
| 200 | 0 | 0 | unless (shift())->local_file |