| line |
true |
false |
branch |
|
26
|
0 |
1 |
if (not defined $validator) { } |
|
|
1 |
0 |
elsif (ref $validator eq 'CODE') { } |
|
|
0 |
0 |
elsif (not ref $validator) { } |
|
33
|
0 |
0 |
if $value =~ /$validator/ |
|
39
|
0 |
3 |
if $self->{'DEBUG'} |
|
43
|
0 |
6 |
if $self->{'DEBUG'} |
|
47
|
1 |
5 |
if (defined $value) { } |
|
49
|
1 |
0 |
if (my $valid = &$f_validator($self, $name, $validator, $value)) { } |
|
62
|
1 |
4 |
if (ref $value eq 'CODE') { } |
|
70
|
5 |
4 |
if (exists $layer->{$name}) |
|
126
|
3 |
0 |
if defined $validator |
|
127
|
2 |
1 |
if defined $getoptlong |
|
128
|
2 |
1 |
if defined $description |
|
130
|
0 |
3 |
unless defined $attr_func |
|
132
|
3 |
0 |
if ($autoproto == 1) |
|
138
|
3 |
0 |
if (exists $attr_hash->{'name'}) { } |
|
150
|
1 |
0 |
if (exists $args->{'attributes'} and ref $args->{'attributes'} eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (exists $args->{'attributes'} and ref $args->{'attributes'} eq 'HASH') { } |
|
152
|
3 |
0 |
if (ref $attr eq 'HASH') { } |
|
176
|
2 |
1 |
ref $self->{$Config::apiLayers::CXLDATA} eq 'ARRAY' ? : |
|
177
|
1 |
2 |
exists $args->{'index'} ? : |
|
178
|
0 |
3 |
unless (exists $args->{'data'}) |
|
179
|
0 |
0 |
if (defined $self->{$Config::apiLayers::CXLDATA}[$layer_idx]) { } |
|
188
|
0 |
5 |
unless grep {/^$key$/;} @{$attrs;} |
|
200
|
1 |
0 |
if (exists $args->{'data'}) |
|
202
|
0 |
1 |
unless grep {/^$key$/;} @{$attrs;} |
|
203
|
0 |
1 |
unless ($self->apicall($key, $args->{'data'}{$key})) |
|
208
|
0 |
1 |
if $errors >= 1 |
|
219
|
1 |
3 |
if (exists $args->{'cfg'} and $args->{'cfg'} eq 'getoptlong') { } |
|
|
1 |
2 |
elsif (exists $args->{'cfg'} and $args->{'cfg'} eq 'descriptions') { } |
|
|
2 |
0 |
elsif (exists $args->{'data'}) { } |
|
222
|
1 |
2 |
unless defined $self->{$Config::apiLayers::CXLCFG}{'getoptlong'}{$attr_name} |
|
229
|
1 |
2 |
unless defined $self->{$Config::apiLayers::CXLCFG}{'description'}{$attr_name} |
|
237
|
1 |
1 |
if (defined $args->{'data'} and not ref $args->{'data'} and $args->{'data'} >= $firstLayer and $args->{'data'} <= $lastLayer) { } |
|
|
1 |
0 |
elsif (ref $args->{'data'} eq 'ARRAY') { } |
|
250
|
2 |
4 |
unless exists $self->{$Config::apiLayers::CXLDATA}[$layer_idx]{$key} |
|
254
|
1 |
0 |
if keys %{$export;} |
|
269
|
0 |
2 |
if (ref $self->{$Config::apiLayers::CXLDATA} ne 'ARRAY') |
|
273
|
0 |
2 |
exists $args->{'index'} ? : |
|
279
|
1 |
1 |
if (exists $args->{'data'}) |
|
289
|
3 |
0 |
if (defined $attr_name) { } |
|
290
|
3 |
0 |
if exists $self->{$Config::apiLayers::CXLCFG}{'api'}{$attr_name} |
|
293
|
0 |
0 |
wantarray ? : |
|
300
|
3 |
0 |
if (defined $attr_name) |
|
304
|
3 |
0 |
if defined $subref |
|
318
|
0 |
0 |
unless defined $p |
|
319
|
0 |
0 |
if ($path =~ m[.+/$]) |
|
325
|
0 |
0 |
if (not defined $path) { } |
|
351
|
0 |
0 |
if ($item =~ m[^/]) { } |
|
363
|
0 |
0 |
if (-d $path) |
|
373
|
0 |
0 |
unless defined $baseDir |