| line |
true |
false |
branch |
|
15
|
5 |
11 |
if (ref $interfaces{$interface} eq 'HASH') { } |
|
|
9 |
2 |
elsif (ref $interfaces{$interface} eq 'ARRAY') { } |
|
|
1 |
1 |
elsif (not defined $interfaces{$interface}) { } |
|
18
|
3 |
2 |
if (exists ${$interface_spec;}{'isa'}) |
|
20
|
1 |
2 |
if (ref $$interface_spec{'isa'} eq 'ARRAY') { } |
|
25
|
1 |
1 |
if ref $$interface_spec{'isa'} |
|
31
|
3 |
1 |
if (exists ${$interface_spec;}{'methods'}) |
|
32
|
1 |
2 |
unless ref $$interface_spec{'methods'} eq 'ARRAY' |
|
51
|
2 |
11 |
if $@ |
|
65
|
1 |
11 |
if $method =~ /^(BEGIN|INIT|CHECK|END|DESTORY|AUTOLOAD|import|bootstrap)$/ |
|
70
|
1 |
10 |
if $@ |
|
77
|
2 |
11 |
if @subclasses |
|
83
|
2 |
4 |
if $sub_exception |