blib/lib/perl5i/2/equal.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 32 | 44 | 72.7 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
27 | 34 | 73 | 116 | $ref1 and $ref2 |
67 | 94 | 16 | 6 | $is_overloaded1 and $is_overloaded2 |
126 | 27 | 21 | 0 | $str and $num |
140 | 0 | 14 | 0 | $type1 and $type2 |
142 | 14 | 0 | 0 | $type1 eq 'both' and $type2 eq 'both' |
7 | 5 | 2 | $type1 eq 'num' and $type2 eq 'str' | |
5 | 3 | 4 | $type1 eq 'str' and $type2 eq 'num' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
20 | 401 | 0 | 10 | defined $r1 or defined $r2 |
27 | 266 | 34 | 90 | $ref1 || $ref2 |
127 | 21 | 0 | 27 | $str or $num |
142 | 2 | 0 | 12 | $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 | 390 | 11 | 9 | 0 | defined $r1 xor defined $r2 |
30 | 53 | 1 | 1 | 35 | $is_num1 xor $is_num2 |