| blib/lib/Amazon/S3/Thin/Credentials.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 17 | 24 | 70.8 |
| line | true | false | branch |
|---|---|---|---|
| 74 | 0 | 1 | unless $ENV{'AWS_ACCESS_KEY_ID'} |
| 75 | 0 | 1 | unless $ENV{'AWS_SECRET_ACCESS_KEY'} |
| 108 | 1 | 2 | if (not $args->{'version'} or $args->{'version'} != 1) |
| 110 | 0 | 1 | unless $res->is_success |
| 123 | 0 | 3 | unless $res->is_success |
| 126 | 0 | 3 | unless @roles > 0 |
| 128 | 1 | 2 | defined $role && grep({$role eq $_;} @roles) ? : |
| 133 | 0 | 3 | unless $cred->is_success |
| 136 | 0 | 3 | if $@ |
| 156 | 1 | 4 | unless defined $relative_uri |
| 159 | 1 | 3 | unless $cred->is_success |
| 162 | 1 | 2 | if $@ |