line |
true |
false |
branch |
23
|
0 |
1 |
if (@_ % 2 == 1) { } |
36
|
10 |
1 |
if (defined $key) { } |
37
|
7 |
3 |
if (exists $self->{$key}) { } |
40
|
2 |
5 |
if (defined $value) { } |
42
|
0 |
2 |
if ($value eq '') { } |
47
|
2 |
0 |
defined $prev ? : |
51
|
0 |
5 |
unless (defined $retType) |
53
|
0 |
0 |
defined $self->{$key} ? : |
58
|
0 |
3 |
unless (defined $retType) |
66
|
0 |
1 |
if (not defined $retType) { } |
|
0 |
1 |
elsif ($retType) { } |
69
|
0 |
0 |
defined $self->{$_} ? : |
85
|
4 |
1 |
if (defined $key) { } |
86
|
2 |
2 |
if (not exists $self->{$key}) { } |
87
|
1 |
1 |
if (defined $value) { } |
94
|
1 |
1 |
unless (defined $retType) |
109
|
3 |
1 |
if (defined $key) { } |
110
|
1 |
2 |
if (exists $self->{$key}) { } |
114
|
1 |
1 |
unless (defined $retType) |
128
|
2 |
1 |
if (defined $key) { } |
129
|
1 |
1 |
if (exists $self->{$key}) |
142
|
0 |
0 |
if ($^O eq 'MSWin32' and not defined $home_dir) |
147
|
0 |
0 |
if (-e $config_file) { } |
|
0 |
0 |
elsif (-e $home_dir . '/' . $config_file) { } |
|
0 |
0 |
elsif (defined $dir and -e $dir . '/' . $config_file) { } |