line |
true |
false |
branch |
28
|
0 |
0 |
unless $dbName =~ m[/$] |
29
|
0 |
0 |
if (not $$self{'client'}->dbExists($dbName)) { } |
47
|
0 |
0 |
if (not $db->docExists($id)) { } |
55
|
0 |
0 |
if (keys %$origAttach and keys %$newAttach) { } |
57
|
0 |
0 |
if (_SAME($content, $data)) { } |
59
|
0 |
0 |
if (scalar keys %$origAttach != scalar keys %$newAttach or grep {not exists $$origAttach{$_};} keys %$newAttach or grep {$$origAttach{$_}{'content_type'} ne $$newAttach{$_}{'content_type'};} keys %$newAttach) { } |
70
|
0 |
0 |
if ($b64 ne $doc->toBase64($doc->fetchAttachment($att))) |
81
|
0 |
0 |
unless (_SAME($content, $data)) |
103
|
0 |
0 |
if (not $db->designDocExists($id)) { } |
109
|
0 |
0 |
unless (_SAME($dd->data, $data)) |
127
|
0 |
0 |
unless open my $F, '<', $file |