line |
true |
false |
branch |
24
|
0 |
3 |
unless $factory_class_name->require |
27
|
0 |
6 |
unless my $list = shift @args |
30
|
0 |
6 |
ref $list eq 'ARRAY' ? : |
33
|
6 |
0 |
if (not ref $obj_def) { } |
38
|
0 |
0 |
defined $composites ? : |
|
0 |
0 |
ref $composites eq 'ARRAY' ? : |
47
|
0 |
0 |
if defined &DB::DB and not $Devel::DProf::VERSION |
72
|
0 |
4 |
if defined &DB::DB and not $Devel::DProf::VERSION |
75
|
4 |
0 |
unless ($expected_class) |
78
|
0 |
4 |
unless $expected_class |
83
|
0 |
4 |
unless $expected_class->require |
87
|
0 |
4 |
if (defined $args[0] and UNIVERSAL::isa($args[0], $expected_class)) { } |
|
4 |
0 |
elsif (@args or not defined $$self{$name}) { } |
97
|
0 |
4 |
scalar(@args == 1) && ref $args[0] eq 'HASH' ? : |
114
|
0 |
0 |
if defined &DB::DB and not $Devel::DProf::VERSION |
122
|
0 |
0 |
if defined &DB::DB and not $Devel::DProf::VERSION |
136
|
0 |
3 |
unless $factory_class_name->require |
139
|
0 |
3 |
unless my $list = shift @args |
142
|
0 |
3 |
ref $list eq 'ARRAY' ? : |
148
|
0 |
1 |
if defined &DB::DB and not $Devel::DProf::VERSION |
151
|
2 |
0 |
ref $_ ? : |
152
|
0 |
2 |
ref $_ eq 'ARRAY' ? : |
169
|
0 |
1 |
if defined &DB::DB and not $Devel::DProf::VERSION |
172
|
0 |
1 |
unless defined $$self{$field} |
173
|
0 |
1 |
if @_ |
174
|
1 |
0 |
wantarray ? : |
180
|
0 |
1 |
if defined &DB::DB and not $Devel::DProf::VERSION |
189
|
0 |
0 |
if defined &DB::DB and not $Devel::DProf::VERSION |
199
|
0 |
1 |
if defined &DB::DB and not $Devel::DProf::VERSION |
208
|
0 |
0 |
if defined &DB::DB and not $Devel::DProf::VERSION |
218
|
0 |
0 |
if defined &DB::DB and not $Devel::DProf::VERSION |
228
|
0 |
0 |
if defined &DB::DB and not $Devel::DProf::VERSION |
238
|
0 |
0 |
if defined &DB::DB and not $Devel::DProf::VERSION |
248
|
0 |
1 |
if defined &DB::DB and not $Devel::DProf::VERSION |
252
|
1 |
0 |
exists $$self{$field} ? : |
258
|
0 |
1 |
if defined &DB::DB and not $Devel::DProf::VERSION |
265
|
1 |
0 |
if @_ == 1 |
266
|
0 |
0 |
wantarray ? : |
272
|
0 |
0 |
if defined &DB::DB and not $Devel::DProf::VERSION |
276
|
0 |
0 |
if @args % 2 |
287
|
0 |
0 |
if defined &DB::DB and not $Devel::DProf::VERSION |