| line |
true |
false |
branch |
|
87
|
2 |
0 |
unless (defined &List::Util::first(sub {
$value eq $_;
}
, @{$array;})) |
|
98
|
2 |
1 |
unless (defined &List::Util::first(sub {
$value eq $_;
}
, @{$array;})) |
|
101
|
1 |
4 |
if ($$array[$idx] eq $afterValue) |
|
114
|
2 |
1 |
unless (defined &List::Util::first(sub {
$value eq $_;
}
, @{$array;})) |
|
117
|
1 |
4 |
if ($$array[$idx] eq $beforeValue) |
|
135
|
7 |
0 |
if (open my $FILE, '>', $filename) { } |
|
163
|
18 |
11 |
if (exists $$directive{$lastPart}) |
|
174
|
2 |
6 |
if ($$array[$i] eq $value) |
|
193
|
122 |
0 |
if (defined $property) |
|
199
|
1 |
162 |
if ($@) |
|
203
|
62 |
59 |
if defined $value |
|
208
|
12 |
22 |
if defined $value |
|
241
|
23 |
18 |
if (exists $$directive{$part}) { } |
|
242
|
17 |
6 |
if ($i == $numParts - 1) { } |
|
259
|
3 |
6 |
if $found |
|
263
|
9 |
6 |
unless ($self->isInclude) |
|
267
|
3 |
3 |
unless (exists $$directive{$part}) |
|
301
|
0 |
44 |
unless open my $fh, '+<:raw', $realfile |
|
304
|
22 |
22 |
if ($needed_bytes < $current_bytes) { } |
|
|
19 |
3 |
elsif ($needed_bytes > $current_bytes) { } |
|
311
|
0 |
19 |
unless (syswrite $fh, $padding) |