| line |
true |
false |
branch |
|
19
|
2 |
4 |
if exists $args{'config'} |
|
29
|
2 |
9 |
if (defined $data and not $ref) { } |
|
|
1 |
16 |
elsif ($ref and $ref eq 'HASH') { } |
|
45
|
0 |
0 |
unless $config |
|
46
|
0 |
0 |
unless ref $config |
|
47
|
0 |
0 |
if ref $config ne 'HASH' |
|
59
|
0 |
3 |
unless $config |
|
63
|
3 |
0 |
if not ref $sources or ref $sources ne 'ARRAY' |
|
67
|
0 |
3 |
unless exists $source->{'type'} |
|
73
|
0 |
3 |
unless @pod_source and $pod_source[0] |
|
93
|
1 |
5 |
if (@_ == 2 and ref $ref eq 'CODE') |
|
104
|
6 |
3 |
unless $self->{'DEBUG'} |
|
111
|
1 |
10 |
if ($bool and $data) { } |
|
|
4 |
6 |
elsif (not $self->{'__config'} or $bool) { } |
|
115
|
1 |
3 |
unless ($self->config) |