| blib/lib/File/Same.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 16 | 56.2 |
| line | true | false | branch |
|---|---|---|---|
| 62 | 6 | 0 | unless ($orig_md5) |
| 64 | 0 | 6 | unless open FILE, $original |
| 72 | 0 | 18 | if (my $md5 = $md5s{$file}) { } |
| 73 | 0 | 0 | if ($orig_md5 eq $md5) |
| 79 | 0 | 18 | unless open FILE, $file |
| 82 | 5 | 13 | if ($orig_md5 eq $ctx->hexdigest) |
| 101 | 0 | 5 | unless opendir DIR, $dir |
| 133 | 2 | 3 | if 'File::Spec'->rel2abs($file) eq 'File::Spec'->rel2abs($orig) |