Branch Coverage

blib/lib/Games/Go/AGA/DataObjects/Player.pm
Criterion Covered Total %
branch 11 76 14.4


line true false branch
120 144 0 if $$self{'change_callback'}
126 0 0 if (my $name = $self->first_name)
151 7 4 if (not grep({refaddr $_ == $add_refaddr;} @{$$self{'games'};}))
153 7 0 if (@_ < 3) { }
167 1 0 unless (looks_like_number $idx)
168 1 0 if (ref $idx) { }
0 0 elsif ($id1) { }
174 1 1 if (refaddr($$games[$ii]) == $refaddr)
183 0 0 if ($$games[$ii]->black->id eq $id0 and $$games[$ii]->white->id eq $id1 or $$games[$ii]->black->id eq $id1 and $$games[$ii]->white->id eq $id0)
193 0 1 unless (looks_like_number $idx)
194 0 0 if (ref $idx) { }
216 0 0 unless $$self{'adj_rating'}
217 0 0 if (defined $new)
218 0 0 unless defined $round_num
221 0 0 if (defined $round_num)
230 0 0 if ($new)
233 0 0 defined $$self{'handicap_rating'} ? :
243 0 0 wantarray ? :
250 0 0 if defined $_->winner
254 0 0 wantarray ? :
261 0 0 if defined $_->loser
265 0 0 wantarray ? :
273 0 0 refaddr($_->black) == $me ? :
277 0 0 wantarray ? :
286 0 6 wantarray ? :
293 0 0 if defined $_->winner
296 0 1 wantarray ? :
304 0 0 wantarray ? :
310 0 0 if $self->get_flag('drop')
311 0 0 if (defined $round_num)
312 0 0 if $self->get_flag("drop$round_num")
329 0 0 if uc $key eq uc $$flags[$ii]
341 0 0 if uc $key eq uc $$flags[$ii]
355 0 0 if uc $key eq uc $$flags[$ii]
358 0 0 if ($ii < @{$flags;})
375 0 0 if $self->club
383 0 0 if @flags
385 0 0 if ($comment)