| line |
true |
false |
branch |
|
36
|
0 |
3 |
ref $_[0] ? : |
|
37
|
0 |
3 |
@_ == 1 ? : |
|
41
|
0 |
3 |
unless (defined $prop->{'server_type'} and @{$prop->{'server_type'};}) |
|
42
|
0 |
0 |
if (my $ref = $self->can('default_server_type') && $self->default_server_type) |
|
43
|
0 |
0 |
ref $ref ? : |
|
46
|
0 |
3 |
unless $prop->{'server_type'} |
|
47
|
0 |
3 |
if $type eq "MultiType" |
|
48
|
3 |
0 |
$type =~ /^(\w+)$/ ? : |
|
50
|
0 |
3 |
$type =~ /::/ ? : |
|
53
|
0 |
3 |
if ($@) |
|
59
|
0 |
3 |
if ($pkg->isa(__PACKAGE__)) |
|
61
|
0 |
0 |
$type =~ /^(\w+)$/ ? : |
|
62
|
0 |
0 |
$type =~ /::/ ? : |
|
65
|
0 |
0 |
unless eval {
do {
require $file
}
} |
|
66
|
0 |
0 |
if $_pkg->isa($pkg) |