| line |
true |
false |
branch |
|
52
|
0 |
4 |
unless my $mod = shift() |
|
56
|
4 |
0 |
if $file |
|
74
|
0 |
16 |
unless check($tmpl, \%hash) |
|
77
|
0 |
16 |
unless can_load("modules", {"Digest::SHA", "0.0"}) |
|
81
|
0 |
16 |
unless my $file = $self->_get_checksums_file("verbose", $verbose) |
|
84
|
0 |
16 |
unless $self->_check_signature_for_checksum_file("file", $file) |
|
88
|
0 |
16 |
unless my $href = $self->_parse_checksums_file("file", $file) |
|
93
|
0 |
16 |
if (defined $cpan_path) |
|
95
|
0 |
0 |
if ($chk_pth ne $self->path) |
|
107
|
15 |
1 |
if (defined $size) { } |
|
108
|
0 |
15 |
unless (-s $self->status->fetch == $size) |
|
120
|
16 |
0 |
unless (defined $sha) |
|
129
|
0 |
0 |
unless my $fh = "FileHandle"->new($self->status->fetch) |
|
137
|
0 |
0 |
$flag ? : |
|
144
|
0 |
0 |
if $flag |
|
163
|
0 |
24 |
$have_fetchdir ? : |
|
164
|
0 |
24 |
unless my $file = $clone->fetch("ttl", $ttl, %hash) |
|
179
|
0 |
18 |
unless my $fh = sub { ;}->($file) |
|
184
|
18 |
90 |
if /^\$cksum = \{\s*$/ |
|
186
|
18 |
72 |
if /^$header\s*$/ |
|
195
|
69 |
312 |
if (/^\s*'([^']+)' => \{\s*$/) { } |
|
|
173 |
139 |
elsif (/^\s*'([^']+)' => '?([^'\n]+)'?,?\s*$/ and defined $dist) { } |
|
|
87 |
52 |
elsif (/^\s*}[,;]?\s*$/) { } |
|
|
18 |
34 |
elsif (/^__END__\s*$/) { } |
|
223
|
15 |
1 |
unless $conf->get_conf("signature") |
|
232
|
0 |
1 |
unless my $args = check($tmpl, \%hash) |
|
234
|
0 |
1 |
unless my $fh = sub { ;}->($file) |
|
239
|
1 |
34 |
if /^$header$/ |
|
242
|
0 |
1 |
unless ($signed) |
|
246
|
0 |
0 |
unless $force |
|
254
|
0 |
1 |
if (can_load("modules", {"Module::Signature", "0.06"})) |