| line |
true |
false |
branch |
|
21
|
0 |
2 |
@_ == 1 ? :
|
|
24
|
0 |
2 |
unless (exists $args{$key})
|
|
39
|
0 |
0 |
if (open my $fh, '<', $self->{'filename'}) { }
|
|
55
|
0 |
0 |
unless $entry and $entry->{'filename'} and $entry->{'md5'}
|
|
59
|
0 |
0 |
unless -f $fullpath
|
|
61
|
0 |
0 |
if (my $stat = &OrePAN2::Repository::Cache::stat($stuff) && defined $entry->{'mtime'})
|
|
62
|
0 |
0 |
if $stat->mtime ne $entry->{'mtime'}
|
|
66
|
0 |
0 |
unless $md5
|
|
67
|
0 |
0 |
if $md5 ne $entry->{'md5'}
|
|
75
|
0 |
2 |
unless (open my $fh, "<", $filename)
|
|
87
|
0 |
2 |
unless my $md5 = $self->calc_md5("File::Spec"->catfile($self->directory, $filename))
|
|
91
|
0 |
2 |
-f $filename ? :
|