| line |
true |
false |
branch |
|
29
|
0 |
43 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
|
43 |
0 |
elsif (@_ % 2 == 0) { } |
|
|
0 |
0 |
elsif (@_ == 1 and not defined $_[0]) { } |
|
61
|
0 |
1 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
|
1 |
0 |
elsif (@_ % 2 == 0) { } |
|
|
0 |
0 |
elsif (@_ == 1 and not defined $_[0]) { } |
|
78
|
1 |
0 |
if (not exists $$r{'date'} or $$r{'date'} =~ /^\d+$/ or $strdate = str2time($$r{'date'})) { } |
|
|
0 |
0 |
elsif (not $$r{'date'} =~ /^\d{4}-\d{2}-\d{2}T\d{2}:\d{2}:\d{2}\.\d{6}Z$/) { } |
|
97
|
0 |
1 |
exists $$r{'log'} ? : |
|
124
|
0 |
4 |
unless exists $$self{'contents'} |
|
131
|
3 |
15 |
if defined $value |
|
144
|
0 |
3 |
unless exists $$self{'headers'} |
|
150
|
0 |
20 |
unless exists $$self{'headers'} |
|
156
|
0 |
7 |
if (@_ == 1) |
|
159
|
0 |
7 |
if defined $value |
|
168
|
0 |
4 |
unless exists $$self{'properties'} and exists $$self{'properties'}{'property'} |
|
181
|
0 |
2 |
unless exists $$self{'properties'} and exists $$self{'properties'}{'property'} |
|
204
|
0 |
1 |
if defined $value |
|
215
|
0 |
29 |
unless defined $fh and eval {
do {
$fh->isa('IO::Handle')
}
} |
|
222
|
3 |
26 |
if $fh->eof |
|
225
|
26 |
0 |
if exists $$header{'Prop-content-length'} |
|
229
|
8 |
18 |
if exists $$header{'Text-content-length'} |
|
238
|
21 |
5 |
if defined $c |
|
252
|
0 |
18 |
unless defined $fh |
|
257
|
0 |
18 |
unless $header->number |
|
259
|
9 |
9 |
if $$self{'changed'} |
|
264
|
18 |
0 |
if exists $$header{'Prop-content-length'} and $$header{'Prop-content-length'} > 0 |
|
269
|
5 |
13 |
if exists $$header{'Text-content-length'} and $$header{'Text-content-length'} > 0 |
|
273
|
17 |
1 |
exists $$self{'delim'} ? : |
|
279
|
0 |
18 |
unless $self->has_headers |
|
280
|
0 |
18 |
if $$self{'changed'} |
|
316
|
0 |
17 |
if ($$header{'Content-length'} == 0 and not $header_existed) |
|
335
|
17 |
0 |
defined $$self{'contents'} ? : |
|
340
|
13 |
4 |
if (not $header_existed and $length == 0) { } |
|
349
|
0 |
17 |
if $oldlength != $$header{'Text-content-length'} |
|
370
|
0 |
17 |
if (not $header_existed and $$header{'Prop-content-length'} eq 10) |