| blib/lib/WebService/CEPH.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 22 | 27 | 81.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 238 | 0 | 13 | 1 | defined $cephsize and $cephsize == 0 |
| 281 | 0 | 7 | 1 | defined $cephsize and $cephsize == 0 |
| 344 | 3 | 2 | 12 | $etag_md5 and $custom_md5 |
| 5 | 11 | 1 | $etag_md5 and $custom_md5 and $etag_md5 ne $custom_md5 | |
| 475 | 1 | 1 | 1 | $key and $upload_id |
| line | l | !l | condition | |
|---|---|---|---|---|
| 81 | 1 | 5 | $self->{'driver_name'} ||= 'NetAmazonS3' | |
| 82 | 2 | 4 | $self->{'multipart_threshold'} ||= 5242880 | |
| 83 | 1 | 5 | $self->{'multisegment_threshold'} ||= 5242880 | |
| 157 | 15 | 0 | 0 | read($_[0], my $data, $_[2]) // confess("Error reading data $!\n") |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 71 | 34 | 4 | 0 | delete $args{$_} // confess("Missing $_") |