| line |
true |
false |
branch |
|
97
|
10 |
0 |
unless defined $self->{'behaviors'} |
|
99
|
10 |
0 |
unless defined $self->{'behavior'} |
|
102
|
0 |
10 |
unless exists $self->{'behaviors'}{$self->{'behavior'}} |
|
113
|
0 |
10 |
$beh ? : |
|
125
|
0 |
16 |
if (scalar @behaviors == 0) |
|
130
|
0 |
16 |
if (scalar @behaviors > 1) |
|
134
|
16 |
0 |
if (scalar @behaviors == 1) |
|
156
|
4 |
4 |
if (exists $self->{'behaviors'}{$name}) |
|
168
|
0 |
36 |
unless (exists $matrix->{$left}{$right}) |
|
189
|
4 |
0 |
if exists $self->{'behaviors'}{$name} |
|
197
|
0 |
0 |
shift() ? : |
|
218
|
82 |
216 |
unless defined $lefttype and defined $self->{'matrix'}{$lefttype} |
|
221
|
82 |
216 |
unless defined $righttype and defined $self->{'matrix'}{$righttype} |
|
223
|
298 |
0 |
if ($self->{'clone'}) |
|
225
|
234 |
64 |
ref $left ? : |
|
226
|
234 |
64 |
ref $right ? : |
|
241
|
0 |
114 |
if (ref $left ne 'HASH' or ref $right ne 'HASH') |
|
253
|
274 |
88 |
exists $right->{$key} ? : |
|
273
|
0 |
32 |
if (ref $arg eq 'HASH') |
|
280
|
16 |
16 |
if (ref $arg eq 'ARRAY') { } |
|
304
|
466 |
12 |
if (my $type = ref $_[0]) |
|
307
|
450 |
16 |
if $type eq 'Hash::Merge' or &blessed($_[0]) and $_[0]->isa('Hash::Merge') |
|
311
|
0 |
28 |
if defined $CONTEXT |
|
312
|
4 |
24 |
unless defined $_global |