line |
true |
false |
branch |
31
|
0 |
22 |
if exists $$self{'keys'} |
35
|
0 |
22 |
if defined $keys |
45
|
2 |
1 |
if defined $file |
46
|
0 |
3 |
unless defined $$self{'file'} |
52
|
0 |
3 |
unless (open $fh, "<$$self{'file'}") |
60
|
2 |
2 |
if ($rc < $$self{'ridiculous_line_len'}) |
65
|
1 |
1 |
if (index($chunk, "\n") >= 0) |
80
|
1 |
2 |
unless ($result) |
109
|
0 |
0 |
if (defined $new_content) |
130
|
12 |
42 |
unless ($pk) |
137
|
42 |
0 |
if (not $$self{'strict'} or $pk->sanity_check) |
143
|
0 |
0 |
if ($$self{'strict'}) |
167
|
3 |
59 |
if $line =~ /^$/ |
168
|
5 |
54 |
if $line =~ /^#/ |
172
|
42 |
12 |
if (defined $key) { } |
175
|
2 |
10 |
if ($$self{'abort_on_error'}) |
192
|
0 |
21 |
if defined $file |
193
|
0 |
21 |
unless defined $$self{'file'} |
198
|
0 |
21 |
unless open FILE, "<$$self{'file'}" |
228
|
4 |
0 |
unless (defined $file) |
232
|
0 |
4 |
unless (open FILE, ">$file") |
255
|
69 |
4 |
if (defined $text) |
268
|
0 |
0 |
unless (defined $user) |
271
|
0 |
0 |
unless (defined $user) |
279
|
0 |
0 |
unless (defined $pwent[0]) |
296
|
0 |
0 |
unless defined $ssh_dir |