| line |
true |
false |
branch |
|
19
|
2 |
7 |
if exists $args{'config'} |
|
29
|
4 |
14 |
if (defined $data and not $ref) { } |
|
|
1 |
25 |
elsif ($ref and $ref eq 'HASH') { } |
|
45
|
1 |
2 |
unless ref $config |
|
46
|
1 |
1 |
if ref $config ne 'HASH' |
|
58
|
1 |
10 |
unless $config |
|
61
|
1 |
9 |
unless exists $config->{'source'} |
|
64
|
1 |
8 |
unless ref $sources |
|
66
|
4 |
4 |
if ref $sources ne 'ARRAY' |
|
68
|
1 |
7 |
unless exists $config->{'target'} |
|
69
|
1 |
6 |
unless $config->{'target'}{'type'} |
|
75
|
1 |
5 |
unless length $source->{'type'} |
|
84
|
2 |
3 |
unless @pod_source |
|
93
|
2 |
3 |
unless @pods |
|
110
|
2 |
9 |
if (@_ == 2 and ref $ref eq 'CODE') |
|
121
|
6 |
7 |
unless $self->{'DEBUG'} |
|
128
|
3 |
23 |
if ($bool and $data) { } |
|
|
6 |
17 |
elsif (not $self->{'__config'} or $bool) { } |
|
132
|
1 |
5 |
unless ($self->config) |