line |
true |
false |
branch |
35
|
0 |
0 |
if (defined $path) { } |
42
|
0 |
0 |
if (defined $digest) { } |
49
|
0 |
0 |
if (defined $prefix) { } |
56
|
0 |
0 |
unless (-e $$self{'path'}) |
57
|
0 |
0 |
unless mkdir $$self{'path'} |
70
|
0 |
0 |
if ($$self{'digest'} eq 'FAT') { } |
76
|
0 |
0 |
unless my $localDigest = _DigestAFile("$filename", $ldigest) |
81
|
0 |
0 |
if (not $$self{'digest'} eq 'FAT') { } |
94
|
0 |
0 |
unless (-e $SSubDir) |
96
|
0 |
0 |
unless mkpath($SSubDir) |
101
|
0 |
0 |
if (not $$self{'digest'} eq 'FAT') { } |
102
|
0 |
0 |
unless copy($filename, $destStoredFile) |
109
|
0 |
0 |
if (not $$self{'digest'} eq 'FAT') { } |
126
|
0 |
0 |
unless (defined $id) |
128
|
0 |
0 |
if (not $$self{'digest'} eq 'FAT') { } |
138
|
0 |
0 |
if (-e $destStoredFile) { } |
140
|
0 |
0 |
if (not $$self{'digest'} eq 'FAT') { } |
141
|
0 |
0 |
unless unlink $destStoredFile |
144
|
0 |
0 |
unless rmtree($destStoredFile) |
162
|
0 |
0 |
if (not $$self{'digest'} eq 'FAT') { } |
172
|
0 |
0 |
if (-e $destStoredFile) { } |
191
|
0 |
0 |
unless open FILED, "$file" |
192
|
0 |
0 |
if ($digestdef eq 'SHA1') { } |
|
0 |
0 |
elsif ($digestdef eq 'SHA2') { } |