Branch Coverage

blib/lib/Test/MockObject.pm
Criterion Covered Total %
branch 47 52 90.3


line true false branch
11 18 2 unless grep /^-debug/, @_
40 1 22 $name =~ s/^-// ? :
92 2 5 unless @list
106 0 3 unless exists $bindings{reftype $ref}
130 6 53 if blessed $self and exists $$lookup{$sub}
155 3 25 if $$called[0] eq $sub
182 3 12 if abs $pos > @$calls
183 9 3 if $pos > 0
189 0 3 unless my $args = $_[0]->_call($_[1], 1)
196 0 4 unless my $args = $self->_call($subpos, 1)
197 2 2 if $argpos > 0
207 1 5 unless @$calls >= $num
210 2 3 wantarray ? :
223 0 40 if $sub eq 'DESTROY'
234 39 1 if (exists $$subs{$sub}) { }
251 3 42 unless _logs($self, $sub)
256 8 45 unless ref $arg
257 43 2 if refaddr $arg eq refaddr $self
275 2 1 unless ($Test->ok(defined $called && $called eq $sub, $name))
277 2 0 unless defined $called
300 1 7 if ($class->check_class_loaded($modname) and not keys %subs)
318 1 4 unless ($type eq 'CODE')
334 13 17 if exists $INC{$path . '.pm'}
341 7 16 unless (exists $$symtable{$symbol . '::'})
371 305 46 blessed $invocant ? :
412 27 4 if ($log) { }