line |
true |
false |
branch |
23
|
30 |
16 |
if exists $$self[0]{$key} |
25
|
0 |
16 |
unless ($$self[1]{$key}) |
30
|
0 |
16 |
unless $self->load($key) |
36
|
16 |
64 |
ref $ding ? : |
38
|
0 |
80 |
if (exists $$data{'object'}) |
40
|
0 |
0 |
if eval {
do {
$$data{'object'}->isa('Zoidberg::Fish')
}
} |
59
|
32 |
0 |
unless ref $$data{'commands'}{$_} |
62
|
64 |
16 |
if (exists $$data{'export'}) |
75
|
16 |
0 |
unless ref $$data{'events'}{$_} |
78
|
0 |
80 |
if (exists $$data{'import'}) |
89
|
0 |
80 |
if (exists $$data{'parser'}) |
91
|
0 |
0 |
ref $$data{'parser'} eq 'ARRAY' ? : |
109
|
0 |
0 |
if eval {
do {
$$self[0]{$key}->isa('Zoidberg::Fish')
}
} |
125
|
0 |
16 |
unless -d $dir |
127
|
0 |
80 |
unless /^(\w+)/ |
129
|
0 |
80 |
if exists $$self[1]{$name} |
130
|
0 |
80 |
if (-d "$dir/$_") { } |
|
16 |
64 |
elsif (/.pm$/) { } |
132
|
0 |
0 |
unless $conf |
134
|
0 |
0 |
if -d "$dir/$_/data" |
144
|
0 |
80 |
if $@ |
152
|
0 |
16 |
unless ($class) |
165
|
0 |
16 |
if exists $$self[1]{$zoidname}{'pmfile'} |
168
|
16 |
0 |
unless $@ |
169
|
16 |
0 |
if (eval {
do {
$class->isa('Zoidberg::Fish')
}
}) { } |
|
0 |
0 |
elsif ($class->can('new')) { } |
176
|
0 |
16 |
if ($@) { } |
194
|
2 |
0 |
if eval {
do {
$$self[0]{$_}->isa('Zoidberg::Fish')
}
} |