line |
true |
false |
branch |
26
|
0 |
0 |
if ($self->{'rules'} and @{$self->{'rules'};}) { } |
48
|
2 |
0 |
unless $self->{'rules'} |
56
|
0 |
0 |
if $globals->{'path'} and @{$globals->{'path'};} |
60
|
0 |
0 |
if exists $_->{'merge'} and keys %{$_;} == 1 |
84
|
0 |
0 |
if @explicit == @{$spath;} |
93
|
0 |
0 |
if (@dsts) |
100
|
0 |
0 |
if (ref $step eq 'ARRAY' and implicit_step($step)) { } |
|
0 |
0 |
elsif (ref $step eq 'HASH' and implicit_step($step)) { } |
101
|
0 |
0 |
if (my(@tmp) = &path(${$data;}, \@e_path, 'deref', 1, 'paths', 1)) |
107
|
0 |
0 |
if (my(@tmp) = &path(${$data;}, [@e_path, $step], 'paths', 1)) |
114
|
0 |
0 |
unless @e_path |
117
|
0 |
0 |
if ref $_ eq 'ARRAY' |
129
|
0 |
0 |
unless $rule->{'path'} and @{$rule->{'path'};} |
131
|
0 |
0 |
unless ref $_ |
140
|
0 |
0 |
if (exists $opts->{'ignore'}) |
154
|
0 |
0 |
unless defined $path->{'merge'} |
157
|
0 |
0 |
if $@ |
161
|
0 |
0 |
unless (@srcs) |
163
|
0 |
0 |
exists $path->{'strict'} ? : |
|
0 |
0 |
if exists $path->{'strict'} ? $path->{'strict'} : $opts->{'strict'} |
183
|
0 |
0 |
if ($self->{'rules'} and @{$self->{'rules'};}) { } |
184
|
0 |
0 |
if (exists $self->{'rules'}[-1]{'path'} and @{$self->{'rules'}[-1]{'path'};}) { } |