line |
true |
false |
branch |
31
|
19 |
1 |
if ($self->{'rules'} and @{$self->{'rules'};}) { } |
55
|
48 |
21 |
unless $self->{'rules'} |
63
|
2 |
20 |
if $globals->{'path'} and @{$globals->{'path'};} |
67
|
16 |
5 |
if exists $_->{'merge'} and keys %{$_;} == 1 |
71
|
1 |
21 |
if exists $rule->{'structure'} |
94
|
17 |
7 |
if @explicit == @{$spath;} |
103
|
3 |
4 |
if (@dsts) |
110
|
5 |
13 |
if (ref $step eq 'ARRAY' and implicit_step($step)) { } |
|
1 |
20 |
elsif (ref $step eq 'HASH' and implicit_step($step)) { } |
111
|
4 |
1 |
if (my(@tmp) = &path(${$data;}, \@e_path, 'deref', 1, 'paths', 1)) |
117
|
0 |
1 |
if (my(@tmp) = &path(${$data;}, [@e_path, $step], 'paths', 1)) |
124
|
0 |
4 |
unless @e_path |
127
|
1 |
1 |
if ref $_ eq 'ARRAY' |
139
|
9 |
15 |
unless $rule->{'path'} and @{$rule->{'path'};} |
141
|
16 |
11 |
unless ref $_ |
150
|
21 |
3 |
if (exists $opts->{'ignore'}) |
164
|
9 |
18 |
unless defined $path->{'merge'} |
166
|
1 |
26 |
if (exists $opts->{'structure'}) |
172
|
0 |
27 |
if $@ |
176
|
3 |
24 |
unless (@srcs) |
178
|
1 |
2 |
exists $path->{'strict'} ? : |
|
2 |
1 |
if exists $path->{'strict'} ? $path->{'strict'} : $opts->{'strict'} |
198
|
10 |
0 |
if ($self->{'rules'} and @{$self->{'rules'};}) { } |
199
|
5 |
5 |
if (exists $self->{'rules'}[-1]{'path'} and @{$self->{'rules'}[-1]{'path'};}) { } |