| line |
true |
false |
branch |
|
48
|
6 |
42 |
if (defined $split) { } |
|
50
|
3 |
3 |
@rest == 1 ? : |
|
77
|
2 |
7 |
if (ref $source eq 'ARRAY') { } |
|
|
2 |
5 |
elsif (not ref $source) { } |
|
79
|
2 |
0 |
if ($type eq 'text') { } |
|
129
|
1 |
22 |
if ($self->{'DELETED'}{$key}) { } |
|
|
6 |
16 |
elsif (exists $self->{'OVERRIDE'}{$key}) { } |
|
135
|
13 |
5 |
if (defined $source->{$key}) |
|
189
|
1 |
4 |
if exists $self->{'DELETED'}{$key} |
|
191
|
3 |
5 |
if exists $source->{$key} |
|
206
|
0 |
21 |
if ($tie) { } |
|
238
|
18 |
294 |
if ($self->{'EACH'} == -1) { } |
|
247
|
280 |
32 |
if (defined $key) |
|
248
|
4 |
276 |
if ($self->{'DELETED'}{$key}) { } |
|
|
7 |
269 |
elsif ($self->{'EACH'} >= 0 and exists $self->{'OVERRIDE'}{$key}) { } |
|
|
126 |
143 |
elsif ($self->{'EACH'} > 0) { } |
|
254
|
2 |
124 |
if (defined $self->{'SOURCES'}[$index]{$key}) |