| line |
true |
false |
branch |
|
99
|
0 |
0 |
unless $region |
|
100
|
0 |
0 |
unless $access_key_id |
|
101
|
0 |
0 |
unless $secret |
|
123
|
0 |
0 |
unless $vault_name |
|
128
|
0 |
0 |
unless $res->is_success |
|
145
|
0 |
0 |
unless $vault_name |
|
149
|
0 |
0 |
unless $res->is_success |
|
171
|
0 |
0 |
unless $vault_name |
|
175
|
0 |
0 |
unless $res->is_success |
|
200
|
0 |
0 |
$marker ? : |
|
202
|
0 |
0 |
unless $res->is_success |
|
231
|
0 |
0 |
unless $vault_name |
|
232
|
0 |
0 |
unless $sns_topic |
|
233
|
0 |
0 |
unless ref $events eq 'ARRAY' |
|
237
|
0 |
0 |
if defined $sns_topic |
|
240
|
0 |
0 |
if defined $events |
|
250
|
0 |
0 |
unless $res->is_success |
|
270
|
0 |
0 |
unless $vault_name |
|
276
|
0 |
0 |
unless $res->is_success |
|
295
|
0 |
0 |
unless $vault_name |
|
301
|
0 |
0 |
unless $res->is_success |
|
325
|
0 |
0 |
unless $vault_name |
|
326
|
0 |
0 |
unless $archive_path |
|
327
|
0 |
0 |
unless -f $archive_path |
|
352
|
0 |
0 |
unless $vault_name |
|
353
|
0 |
0 |
unless ref $ref |
|
376
|
0 |
0 |
unless $res->is_success |
|
379
|
0 |
0 |
if (not $res->header('location') =~ m[^/[^/]+/vaults/[^/]+/archives/(.*)$]) { } |
|
400
|
0 |
0 |
unless $vault_name |
|
401
|
0 |
0 |
unless $archive_id |
|
405
|
0 |
0 |
unless $res->is_success |
|
484
|
0 |
0 |
if ($part_size_MiB_rounded < 1048576) { } |
|
|
0 |
0 |
elsif ($part_size_MiB_rounded > 4294967296) { } |
|
515
|
0 |
0 |
unless $vault_name |
|
516
|
0 |
0 |
unless $part_size |
|
517
|
0 |
0 |
unless @_ == 3 or @_ == 4 |
|
531
|
0 |
0 |
unless $res->is_success |
|
537
|
0 |
0 |
unless $multipart_upload_id |
|
569
|
0 |
0 |
unless $vault_name |
|
570
|
0 |
0 |
unless $multipart_upload_id |
|
571
|
0 |
0 |
unless @_ == 6 |
|
576
|
0 |
0 |
if (ref $part eq 'SCALAR') { } |
|
579
|
0 |
0 |
unless length $$content |
|
585
|
0 |
0 |
if $@ |
|
587
|
0 |
0 |
unless length $$content |
|
614
|
0 |
0 |
unless $res->is_success |
|
618
|
0 |
0 |
unless $th->get_final_hash eq $res->header('x-amz-sha256-tree-hash') |
|
651
|
0 |
0 |
unless $vault_name |
|
652
|
0 |
0 |
unless $multipart_upload_id |
|
653
|
0 |
0 |
unless ref $tree_hash_array_ref eq 'ARRAY' |
|
654
|
0 |
0 |
unless @_ == 5 |
|
666
|
0 |
0 |
unless $res->is_success |
|
669
|
0 |
0 |
if (not $res->header('location') =~ m[^/[^/]+/vaults/[^/]+/archives/(.*)$]) { } |
|
691
|
0 |
0 |
unless $vault_name |
|
692
|
0 |
0 |
unless $multipart_upload_id |
|
693
|
0 |
0 |
unless @_ == 3 |
|
699
|
0 |
0 |
unless $res->is_success |
|
703
|
0 |
0 |
unless $res->code == 204 |
|
726
|
0 |
0 |
unless $vault_name |
|
727
|
0 |
0 |
unless $multipart_upload_id |
|
728
|
0 |
0 |
unless @_ == 3 |
|
735
|
0 |
0 |
$marker ? : |
|
737
|
0 |
0 |
unless $res->is_success |
|
762
|
0 |
0 |
unless $vault_name |
|
763
|
0 |
0 |
unless @_ == 2 |
|
770
|
0 |
0 |
$marker ? : |
|
772
|
0 |
0 |
unless $res->is_success |
|
803
|
0 |
0 |
unless $vault_name |
|
804
|
0 |
0 |
unless $archive_id |
|
811
|
0 |
0 |
if (defined $description) |
|
816
|
0 |
0 |
if defined $sns_topic |
|
825
|
0 |
0 |
unless $res->is_success |
|
848
|
0 |
0 |
unless $vault_name |
|
849
|
0 |
0 |
unless $format |
|
855
|
0 |
0 |
if defined $format |
|
858
|
0 |
0 |
if (defined $description) |
|
863
|
0 |
0 |
if defined $sns_topic |
|
872
|
0 |
0 |
unless $res->is_success |
|
904
|
0 |
0 |
unless $res->is_success |
|
925
|
0 |
0 |
unless $vault_name |
|
926
|
0 |
0 |
unless $vault_name |
|
930
|
0 |
0 |
if defined $range |
|
935
|
0 |
0 |
unless $res->is_success |
|
937
|
0 |
0 |
wantarray ? : |
|
955
|
0 |
0 |
unless $vault_name |
|
962
|
0 |
0 |
$marker ? : |
|
964
|
0 |
0 |
unless $res->is_success |
|
984
|
0 |
0 |
unless $tree_hash_array_ref |
|
985
|
0 |
0 |
unless ref $tree_hash_array_ref eq 'ARRAY' |
|
986
|
0 |
0 |
unless length join('', map(/^[0-9a-fA-F]{64}$/, @$tree_hash_array_ref)) == scalar @$tree_hash_array_ref |
|
1001
|
0 |
0 |
if (@prevLvlHashes - $prevLvlIterator > 1) { } |
|
1020
|
0 |
0 |
if ($res->is_success) { } |
|
1036
|
0 |
0 |
$header ? : |
|
1050
|
0 |
0 |
if ($res->is_error) |
|
1057
|
0 |
0 |
if ($@) |
|
1067
|
0 |
0 |
unless ref $description eq 'SCALAR' |
|
1070
|
0 |
0 |
if $changes |
|
1071
|
0 |
0 |
if (length $$description > 1024) |