| blib/lib/Acme/Mitey/Cards/Hand.pm.mite.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 4 | 9 | 44.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 53 | 0 | 0 | 2 | do { package Acme::Mitey::Cards::Mite; ref $args->{'cards'} eq "ARRAY" } and do { my $ok = 1; foreach my $i (@{$$args{"cards"};}) { $ok = 0, last unless do { $i->isa("Acme::Mitey::Cards::Card") if &Scalar::Util::blessed($i) }; } ; $ok } |
| 110 | 0 | 3 | 0 | not $no_build and @{[] unless $meta->{'BUILD'};} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 37 | 1 | 2 | 0 | $Mite::META{$class} ||= $class->__META__ |