| blib/lib/Test/MockObject.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 30 | 41 | 73.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 130 | 42 | 17 | 0 | &blessed($self) and exists $lookup->{$sub} |
| 275 | 2 | 0 | 1 | defined $called && $called eq $sub |
| 300 | 4 | 3 | 1 | $class->check_class_loaded($modname) and not keys %subs |
| line | l | !l | condition |
|---|---|---|---|
| 30 | 0 | 19 | $type ||= {} |
| 37 | 22 | 1 | $sub ||= sub { } |
| 190 | 2 | 1 | $_[2] || '' |
| 204 | 1 | 5 | $num ||= 1 |
| 312 | 2 | 5 | do { $modname . '::' }->{'VERSION'} ||= -1 |
| 317 | 4 | 1 | &reftype($subs{$sub}) || '' |
| 379 | 63 | 13 | $calls{_get_key(shift())} ||= [] |
| 393 | 104 | 13 | $subs{_get_key(shift())} ||= {} |
| 410 | 22 | 9 | $logs{$key} ||= {} |
| 440 | 6 | 4 | $isas{_get_key(shift())} ||= {} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 266 | 0 | 2 | 0 | $name ||= "object called '${sub}'" |
| 273 | 0 | 3 | 0 | $name ||= "object called '${sub}' at position $pos" |
| 285 | 0 | 1 | 0 | $name ||= "object sent expected args to sub at position $pos" |
| 292 | 0 | 1 | 0 | $name ||= "object sent expected arg '${arg}' to sub at position $pos" |