| line |
true |
false |
branch |
|
220
|
9 |
0 |
unless (defined $isa) |
|
221
|
4 |
5 |
if defined $class |
|
242
|
9 |
0 |
unless $args{'required'} |
|
270
|
0 |
9 |
if ref $args ne 'HASH' |
|
271
|
3 |
6 |
if defined $args_builder |
|
290
|
9 |
0 |
unless defined $default_class |
|
291
|
0 |
9 |
if defined $class_arg and "$class_arg" eq '0' |
|
292
|
0 |
9 |
if defined $class_builder and "$class_builder" eq '0' |
|
294
|
1 |
8 |
if defined $class_arg and "$class_arg" eq '1' |
|
297
|
1 |
8 |
if (ref $class_builder eq 'CODE') { } |
|
|
6 |
2 |
elsif (not defined $class_builder) { } |
|
306
|
8 |
1 |
if (defined $class_builder and "$class_builder" eq '1') |
|
308
|
8 |
0 |
unless $class_builder =~ /^_/ |
|
311
|
7 |
2 |
if ($class_builder_sub) |
|
323
|
2 |
7 |
defined $class_arg ? : |
|
324
|
7 |
2 |
unless defined $class |
|
325
|
4 |
5 |
unless defined $class |
|
326
|
0 |
9 |
unless defined $class |
|
328
|
0 |
9 |
if $class =~ /^::/ |
|
341
|
0 |
9 |
if defined $args_builder and "$args_builder" eq '0' |
|
345
|
1 |
8 |
if (ref $args_builder eq 'CODE') |
|
350
|
2 |
7 |
if (defined $args_builder and "$args_builder" eq '1') |
|
352
|
2 |
0 |
unless $args_builder =~ /^_/ |
|
355
|
1 |
8 |
if ($args_builder_sub) |
|
413
|
0 |
0 |
unless $args{'required'} |
|
436
|
0 |
0 |
unless $class->can('new') |