line |
true |
false |
branch |
28
|
0 |
6 |
ref $_[0] ? : |
34
|
0 |
6 |
@_ == 1 ? : |
|
0 |
6 |
$meta->{'HAS_BUILDARGS'} ? : |
38
|
2 |
4 |
if (exists $args->{'deck'}) |
40
|
0 |
2 |
unless do {
$args->{'deck'}->isa("Acme::Mitey::Cards::Deck") if &Scalar::Util::blessed($args->{'deck'})
} |
43
|
2 |
0 |
if &Scalar::Util::blessed($args->{'deck'}) |
51
|
2 |
4 |
if exists $self->{'deck'} |
54
|
2 |
4 |
if (exists $args->{'reverse'}) |
55
|
0 |
2 |
unless do {
package Acme::Mitey::Cards::Mite;
if (defined $args->{'reverse'}) {
ref \(my $val = $args->{'reverse'}) eq "SCALAR" unless ref \$args->{'reverse'} eq "SCALAR";
}
} |
58
|
2 |
0 |
if (defined $args->{'reverse'}) |
60
|
0 |
2 |
unless ref \$args->{'reverse'} eq "SCALAR" |
71
|
0 |
6 |
if @unknown |
75
|
0 |
6 |
unless $meta->{'BUILD'} |
|
0 |
6 |
if not $no_build and @{[] unless $meta->{'BUILD'};} |
83
|
0 |
0 |
unless $meta->{'BUILD'} |
90
|
63 |
0 |
defined ${^GLOBAL_PHASE} ? : |
94
|
0 |
63 |
unless $meta->{'DEMOLISH'} |
101
|
0 |
0 |
if $e |
114
|
0 |
15 |
*{$_;}{'CODE'} ? : |
118
|
0 |
15 |
*{$_;}{'CODE'} ? : |
129
|
0 |
0 |
if exists $DOES{$role} |
130
|
0 |
0 |
if $role eq "Acme::Mitey::Cards::Card" |
162
|
5 |
1 |
exists $_[0]{'reverse'} ? : |
|
0 |
6 |
@_ > 1 ? : |
164
|
0 |
1 |
unless do {
package Acme::Mitey::Cards::Mite;
if (defined $default_value) {
ref \(my $val = $default_value) eq "SCALAR" unless ref \$default_value eq "SCALAR";
}
} |
167
|
1 |
0 |
if (defined $default_value) |
168
|
0 |
1 |
unless ref \$default_value eq "SCALAR" |