Branch Coverage

blib/lib/Games/Cards.pm
Criterion Covered Total %
branch 19 74 25.6


line true false branch
206 0 5 if (defined(my $nick = $cardset->nickname))
219 0 0 if (exists $$self{'cardset_by_name'}{$name}) { }
234 0 0 if (exists $$self{'cardset_by_nickname'}{$nickname}) { }
256 0 0 if (exists $$self{'card_by_truename'}{$truename}) { }
294 0 1 if (ref $class)
351 0 0 $set->size ? :
393 322 0 $set->size ? :
457 306 339 if $number eq 'all'
460 1 644 if ($donor->size < $number)
524 0 0 $description =~ /^-?\d+$/ ? :
528 0 0 unless (defined $donor_index and $donor_index < $donor->size)
562 0 0 $description =~ /^-?\d+$/ ? :
567 0 0 unless defined $initial
616 0 0 if (ref $description eq 'Games::Cards::Card') { }
0 0 elsif ($description =~ /^[\dakqj]+[chds]/i) { }
630 0 0 if &$find($card)
710 644 644 unless defined $in_cards
713 306 982 if $offset < 0
716 306 982 unless defined $length
723 0 1288 if $offset > $set->size or $length + $offset > $set->size
799 0 0 unless $a->suit_value <=> $b->suit_value
862 0 0 $long ? :
867 0 0 if ($long) { }
870 0 0 if (++$i % $max_per_line) { }
879 0 0 unless $set->size
998 0 0 $old_card->is_face_up ? :
1018 0 0 $face_up ? :
0 0 $face_up ? :
0 0 $long ? :
1055 36 16 if ($name =~ /^\d+$/) { }
1058 0 16 $long ? :
1073 0 52 $long ? :
1091 0 0 if (exists $color_map{$suit}) { }
1139 0 0 unless ($$card{'face_up'})
1157 0 0 if ($$card{'face_up'})
1184 0 0 unless defined $set
1190 830 0 $cardset->isa('Games::Cards::CardSet') ? :