| line |
true |
false |
branch |
|
120
|
0 |
5 |
if (defined $filename and open XFILE, $filename) |
|
123
|
0 |
0 |
if $@ |
|
127
|
0 |
5 |
if (defined $raw_config) |
|
129
|
0 |
0 |
if defined $filename |
|
137
|
0 |
5 |
if (/\s/) |
|
147
|
0 |
0 |
unless defined $$result{$k} |
|
181
|
23 |
0 |
if ($name =~ m[/]) |
|
205
|
18 |
72 |
if (defined $new and $new != 0) |
|
227
|
20 |
5 |
unless defined $new |
|
255
|
0 |
12 |
@_ == 3 ? : |
|
277
|
0 |
2 |
@_ == 3 ? : |
|
318
|
19 |
4 |
defined $caller_penalty ? : |
|
334
|
5 |
18 |
if $field eq 'args' |
|
336
|
3 |
20 |
unless defined $subroutine |
|
346
|
0 |
23 |
if (defined $cluster_cfg) |
|
348
|
0 |
0 |
if (defined $$cluster_cfg{$package}) { } |
|
359
|
0 |
0 |
if (defined $$cluster_cfg{$tmp}) |
|
373
|
0 |
23 |
if (defined $file_cfg) { } |
|
379
|
0 |
23 |
if (defined $file_cfg) |
|
394
|
14 |
9 |
if defined $DB::args[0] |