blib/lib/perl5i/2/equal.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 28 | 44 | 63.6 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
27 | 20 | 19 | 86 | $ref1 and $ref2 |
67 | 72 | 14 | 0 | $is_overloaded1 and $is_overloaded2 |
126 | 4 | 4 | 0 | $str and $num |
140 | 0 | 2 | 0 | $type1 and $type2 |
142 | 2 | 0 | 0 | $type1 eq 'both' and $type2 eq 'both' |
1 | 1 | 0 | $type1 eq 'num' and $type2 eq 'str' | |
1 | 1 | 0 | $type1 eq 'str' and $type2 eq 'num' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
20 | 184 | 0 | 10 | defined $r1 or defined $r2 |
27 | 129 | 20 | 24 | $ref1 || $ref2 |
127 | 4 | 0 | 4 | $str or $num |
142 | 0 | 0 | 2 | $type1 eq 'num' and $type2 eq 'str' or $type1 eq 'str' and $type2 eq 'num' |
143 | 0 | 0 | 0 | $obj1 == $obj2 || $obj1 eq $obj2 |
line | l&&r | l&&!r | !l&&r | !l&&!r | condition |
---|---|---|---|---|---|
23 | 173 | 11 | 9 | 0 | defined $r1 xor defined $r2 |
30 | 17 | 1 | 1 | 5 | $is_num1 xor $is_num2 |