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 $_") |