Branch Coverage

lib/Archive/BagIt/Role/Manifest.pm
Criterion Covered Total %
branch 32 44 72.7


line true false branch
28 72 12 if (-f $file)
45 53 4 if (-f $file)
69 0 0 unless (exists $INC{'Parallel/parallel_map.pm'})
103 0 125 unless open my $XXMANIFEST, "<:encoding(UTF-8)", $xxmanifest_file
107 0 383 unless defined $digest and defined $file
117 53 0 if (defined $tm_file)
126 72 0 if (defined $m_file)
134 0 549 if (not defined $localname or 0 == length $localname)
162 10 167 if ($self->bagit->use_parallel) { }
193 15 22 if (defined $return_all_errors) { }
204 0 382 unless (-r $filepath)
218 8 373 unless (exists $xxmanifest_entries->{$normalized_local_name})
231 7 362 if (check_if_payload_filepath_violates($local_mf_entry_path)) { }
237 1 361 unless (exists $normalised_files{$local_mf_entry_path})
247 111 0 if (defined $digest_hashes_ref and ref $digest_hashes_ref eq "ARRAY")
251 0 314 unless (defined $digest_entry->{'expected_digest'})
252 21 293 if ($digest_entry->{'calculated_digest'} ne $digest_entry->{'expected_digest'})
268 13 91 if ($return_all_errors and scalar @invalid_messages > 0)
281 73 12 if ($self->manifest_file)
296 53 4 if ($self->tagmanifest_file)
314 66 0 if (defined $digest_hashes_ref and ref $digest_hashes_ref eq "ARRAY")
315 0 66 unless open my $fh, ">:encoding(UTF-8)", $manifest_file