blib/lib/WebService/S3/Tiny.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 20 | 31 | 64.5 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
114 | 2 | 96 | 0 | $part ne '.' and length $part || $_ == $#old_parts |
line | l | !l | condition |
---|---|---|---|
15 | 3 | 0 | $args{'access_key'} // croak('"access_key" is required') |
16 | 3 | 0 | $args{'host'} // croak('"host" is required') |
17 | 1 | 2 | $args{'region'} //= 'us-east-1' |
18 | 3 | 0 | $args{'secret_key'} // croak('"secret_key" is requried') |
19 | 1 | 2 | $args{'service'} //= 's3' |
37 | 30 | 0 | $headers //= {} |
42 | 29 | 1 | $query // {} |
58 | 30 | 0 | $content // '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
20 | 0 | 3 | 0 | $args{'ua'} //= 'HTTP::Tiny'->new |
44 | 1 | 29 | 0 | $object // () |
58 | 0 | 30 | 0 | $headers->{'x-amz-content-sha256'} //= &sha256_hex($content // '') |
114 | 10 | 24 | 62 | length $part || $_ == $#old_parts |