Branch Coverage

lib/CPANPLUS/Module/Checksums.pm
Criterion Covered Total %
branch 34 56 60.7


line true false branch
52 0 3 unless my $mod = shift @_
56 3 0 if $file
74 0 13 unless check($tmpl, \%hash)
77 0 13 unless can_load('modules', {'Digest::MD5', '0.0'})
81 0 13 unless my $file = $self->_get_checksums_file('verbose', $verbose)
84 0 13 unless $self->_check_signature_for_checksum_file('file', $file)
88 0 13 unless my $href = $self->_parse_checksums_file('file', $file)
95 13 0 if (defined $size) { }
96 0 13 if (not -s $self->status->fetch == $size)
108 0 13 unless (defined $md5)
117 0 13 unless my $fh = 'FileHandle'->new($self->status->fetch)
124 13 0 $flag ? :
131 13 0 if $flag
144 0 24 unless my $file = $clone->fetch(%hash, 'force', 1)
159 0 15 unless my $fh = sub {
164 15 75 if /^\$cksum = \{\s*$/
166 15 60 if /^$header\s*$/
175 193 995 if (/^\s*'([^']+)' => \{\s*$/) { }
772 223 elsif (/^\s*'([^']+)' => '?([^'\n]+)'?,?\s*$/ and defined $dist) { }
208 15 elsif (/^\s*}[,;]?\s*$/) { }
15 0 elsif (/^__END__\s*$/) { }
203 10 3 unless $conf->get_conf('signature')
212 0 3 unless my $args = check($tmpl, \%hash)
214 0 3 unless my $fh = sub {
219 3 78 if /^$header$/
222 0 3 if (not $signed)
226 0 0 unless $force
234 3 0 if (can_load('modules', {'Module::Signature', '0.06'}))