line |
true |
false |
branch |
51
|
0 |
4 |
if &Scalar::Util::reftype($response) ne "HASH" or ref $response->{'result'} ne "ARRAY"
|
57
|
0 |
4 |
if ref $result ne "HASH"
|
61
|
28 |
0 |
unless exists $config->{$key}
|
71
|
4 |
0 |
if (exists $config->{'inc'} and ref $config->{'inc'} eq "ARRAY")
|
85
|
0 |
4 |
if (exists $config->{'syntax'}{'perl'} and length $config->{'syntax'}{'perl'})
|
90
|
0 |
0 |
if (exists $config->{'syntax'}{'args'} and ref $config->{'syntax'}{'args'} eq "ARRAY" and scalar @{$config->{'syntax'}{'args'};})
|
113
|
4 |
0 |
if (length $config->{'pls'})
|
115
|
4 |
0 |
unless length $config->{'cmd'}
|
119
|
0 |
4 |
if (ref $config->{'plsargs'} eq "ARRAY")
|
121
|
0 |
0 |
if ref $config->{'args'} ne "ARRAY"
|
125
|
4 |
0 |
if ref $config->{'perltidy'} ne "HASH"
|
127
|
4 |
0 |
if (length $config->{'perltidyrc'})
|
129
|
4 |
0 |
unless length $config->{'perltidy'}{'perltidyrc'}
|