line |
true |
false |
branch |
31
|
0 |
0 |
unless $class |
35
|
0 |
0 |
if eval {
do {
$class->isa($tiny)
}
} |
36
|
0 |
0 |
if eval {
do {
$class->isa($doc)
}
} |
53
|
0 |
0 |
if (not ref $proto and $$stat{'ours'} = util_class_is_ours($proto)) { } |
|
0 |
0 |
elsif (blessed $proto and $$stat{'ours'} = util_class_is_ours(ref $proto)) { } |
67
|
0 |
0 |
unless $attr |
71
|
0 |
0 |
if ($$stat{'caller'}) |
72
|
0 |
0 |
if $proto |
83
|
0 |
0 |
if (@arg) |
84
|
0 |
0 |
if (scalar @arg > 1) { } |
101
|
0 |
0 |
unless my $c_name = shift() |
102
|
0 |
0 |
unless my $base_class = shift() |
108
|
0 |
0 |
if ($@ and not DEBUG()) |
121
|
0 |
0 |
if (exists $$document{$_}) |
122
|
0 |
0 |
if (ref $$document{$_} eq 'MongoDB::OID') { } |
|
0 |
0 |
elsif ($$document{$_} =~ /\A[a-fA-F\d]{24}\z/) { } |