| line |
true |
false |
branch |
|
14
|
0 |
0 |
if (ref $filter eq 'Regexp') |
|
27
|
0 |
0 |
wantarray ? : |
|
58
|
0 |
0 |
wantarray ? : |
|
64
|
0 |
0 |
wantarray ? : |
|
70
|
0 |
0 |
wantarray ? : |
|
89
|
0 |
0 |
unless (@rest) |
|
90
|
0 |
0 |
wantarray ? : |
|
95
|
0 |
0 |
if grep {ref $_ ne 'ARRAY';} @rest |
|
101
|
0 |
0 |
wantarray ? : |
|
116
|
0 |
0 |
unless (List::MoreUtils::any(sub {
_are_equal($item, $_);
}
, @$d)) |
|
130
|
0 |
0 |
unless (@rest) |
|
131
|
0 |
0 |
wantarray ? : |
|
136
|
0 |
0 |
if grep {ref $_ ne 'ARRAY';} @rest |
|
142
|
0 |
0 |
wantarray ? : |
|
157
|
0 |
0 |
if (List::MoreUtils::any(sub {
_are_equal($item, $_);
}
, @$d)) |
|
180
|
0 |
0 |
unless defined $r1 or defined $r2 |
|
183
|
0 |
0 |
if defined $r1 xor defined $r2 |
|
187
|
0 |
0 |
if (not $ref1 || $ref2) { } |
|
|
0 |
0 |
elsif ($ref1 eq $ref2) { } |
|
|
0 |
0 |
elsif ($ref1 and $ref2) { } |
|
190
|
0 |
0 |
if ($is_num1 xor $is_num2) { } |
|
|
0 |
0 |
elsif ($is_num1) { } |
|
205
|
0 |
0 |
if ($ref1 ~~ ['Regexp', 'GLOB', 'CODE']) { } |
|
|
0 |
0 |
elsif ($ref1 eq 'ARRAY') { } |
|
|
0 |
0 |
elsif ($ref1 eq 'HASH') { } |
|
|
0 |
0 |
elsif ($ref1 ~~ ['SCALAR', 'REF']) { } |
|
227
|
0 |
0 |
if ($is_overloaded1 and $is_overloaded2) { } |
|
240
|
0 |
0 |
$ref1 ? : |
|
243
|
0 |
0 |
if ($is_overloaded) { } |
|
245
|
0 |
0 |
$ref1 ? : |
|
263
|
0 |
0 |
if (not $is_overloaded) { } |
|
281
|
0 |
0 |
unless $type1 and $type2 |
|
283
|
0 |
0 |
if ($type1 eq 'both' and $type2 eq 'both') { } |
|
|
0 |
0 |
elsif ($type1 eq 'num' and $type2 eq 'str' or $type1 eq 'str' and $type2 eq 'num') { } |
|
|
0 |
0 |
elsif ('num' ~~ [$type1, $type2]) { } |
|
|
0 |
0 |
elsif ('str' ~~ [$type1, $type2]) { } |
|
293
|
0 |
0 |
$type1 eq 'num' ? : |
|
321
|
0 |
0 |
unless $type |
|
323
|
0 |
0 |
if (&SCALAR::is_number($scalar)) { } |
|
324
|
0 |
0 |
if ($type eq 'str') { } |
|
332
|
0 |
0 |
if ($type eq 'num') { } |
|
345
|
0 |
0 |
if @$r1 != @$r2 |
|
348
|
0 |
0 |
unless _are_equal($$r1[$i], $$r2[$i]) |
|
357
|
0 |
0 |
unless \%$r1 ~~ \%$r2 |
|
361
|
0 |
0 |
unless _are_equal($$r1{$key}, $$r2{$key}) |