| line |
true |
false |
branch |
| 43 |
2 |
2 |
$params{'Compress'} ? : |
| 44 |
0 |
4 |
unless $params{'Content'} |
| 45 |
0 |
4 |
unless $params{'Object'} |
| 51 |
2 |
2 |
if $compress |
| 69 |
0 |
4 |
unless my($head, $object, $headers, $content, $tail) = $message =~ /(-----BEGIN ([^\n\-]+)-----)\n(.*?\n\n)?(.+)(-----END .*?-----)$/s |
| 74 |
2 |
2 |
if $obj |
| 75 |
0 |
4 |
unless $content =~ s/=([^\n]+)$//s |
| 78 |
0 |
4 |
unless $ncheck eq $checksum |
| 79 |
2 |
2 |
if $compress |
| 83 |
3 |
1 |
if ($headers) |
| 87 |
6 |
0 |
if $key |
| 118 |
0 |
20 |
unless $content =~ s/^(\d+)\x00(\d+)\x00// |