| line |
true |
false |
branch |
|
29
|
19 |
1 |
if ($self->{'rules'} and @{$self->{'rules'};}) { } |
|
50
|
45 |
20 |
unless $self->{'rules'} |
|
58
|
2 |
19 |
if $globals->{'path'} and @{$globals->{'path'};} |
|
62
|
16 |
5 |
if exists $_->{'merge'} and keys %{$_;} == 1 |
|
86
|
16 |
7 |
if @explicit == @{$spath;} |
|
95
|
3 |
4 |
if (@dsts) |
|
102
|
5 |
13 |
if (ref $step eq 'ARRAY' and implicit_step($step)) { } |
|
|
1 |
20 |
elsif (ref $step eq 'HASH' and implicit_step($step)) { } |
|
103
|
4 |
1 |
if (my(@tmp) = &path(${$data;}, \@e_path, 'deref', 1, 'paths', 1)) |
|
109
|
0 |
1 |
if (my(@tmp) = &path(${$data;}, [@e_path, $step], 'paths', 1)) |
|
116
|
0 |
4 |
unless @e_path |
|
119
|
1 |
1 |
if ref $_ eq 'ARRAY' |
|
131
|
8 |
15 |
unless $rule->{'path'} and @{$rule->{'path'};} |
|
133
|
16 |
10 |
unless ref $_ |
|
142
|
20 |
3 |
if (exists $opts->{'ignore'}) |
|
156
|
8 |
18 |
unless defined $path->{'merge'} |
|
159
|
0 |
26 |
if $@ |
|
163
|
3 |
23 |
unless (@srcs) |
|
165
|
1 |
2 |
exists $path->{'strict'} ? : |
|
|
2 |
1 |
if exists $path->{'strict'} ? $path->{'strict'} : $opts->{'strict'} |
|
185
|
10 |
0 |
if ($self->{'rules'} and @{$self->{'rules'};}) { } |
|
186
|
5 |
5 |
if (exists $self->{'rules'}[-1]{'path'} and @{$self->{'rules'}[-1]{'path'};}) { } |