blib/lib/Petal/Utils/Equal.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 4 | 12 | 33.3 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
28 | 0 | 0 | 1 | $h1 =~ /\A\d+\z/ and $h2 =~ /\A\d+\z/ |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
19 | 1 | 0 | 0 | shift() || confess(q['equal' expects 2 variables (got nothing)!]) |
22 | 1 | 0 | 0 | $args[0] || confess(q[1st arg to 'equal' should be a variable (got nothing)!]) |
23 | 1 | 0 | 0 | $args[1] || confess(q[2nd arg to 'equal' should be a variable (got nothing)!]) |