| inc/Test/MockObject.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 9 | 41 | 21.9 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 121 | 0 | 0 | 976 | blessed $self and exists $$lookup{$sub} |
| 264 | 0 | 0 | 0 | defined $called && $called eq $sub |
| 289 | 0 | 0 | 0 | $class->check_class_loaded($modname) and not keys %subs |
| line | l | !l | condition |
|---|---|---|---|
| 21 | 0 | 94 | $type ||= {} |
| 28 | 171 | 0 | $sub ||= sub { } |
| 181 | 0 | 0 | $_[2] || '' |
| 195 | 0 | 0 | $num ||= 1 |
| 301 | 0 | 0 | ${$modname . '::';}{'VERSION'} ||= -1 |
| 306 | 0 | 0 | reftype($subs{$sub}) || '' |
| 368 | 852 | 94 | $calls{_get_key(shift())} ||= [] |
| 382 | 1999 | 94 | $subs{_get_key(shift())} ||= {} |
| 399 | 77 | 94 | $logs{$key} ||= {} |
| 429 | 0 | 0 | $isas{_get_key(shift())} ||= {} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 255 | 0 | 0 | 0 | $name ||= "object called '${sub}'" |
| 262 | 0 | 0 | 0 | $name ||= "object called '${sub}' at position $pos" |
| 274 | 0 | 0 | 0 | $name ||= "object sent expected args to sub at position $pos" |
| 281 | 0 | 0 | 0 | $name ||= "object sent expected arg '${arg}' to sub at position $pos" |