| line |
true |
false |
branch |
|
27
|
1 |
4 |
if (open my $fh, '<', $self->filename) { }
|
|
48
|
0 |
1 |
unless $entry and $entry->{'filename'} and $entry->{'md5'}
|
|
52
|
0 |
1 |
unless -f $fullpath
|
|
54
|
0 |
1 |
if (my $stat = &OrePAN2::Repository::Cache::stat($stuff) && defined $entry->{'mtime'})
|
|
55
|
0 |
0 |
if $stat->mtime ne $entry->{'mtime'}
|
|
59
|
0 |
1 |
unless $md5
|
|
60
|
0 |
1 |
if $md5 ne $entry->{'md5'}
|
|
68
|
0 |
5 |
unless (open my $fh, "<", $filename)
|
|
80
|
0 |
4 |
unless my $md5 = $self->calc_md5("File::Spec"->catfile($self->directory, $filename))
|
|
84
|
0 |
4 |
-f $filename ? :
|