line |
true |
false |
branch |
27
|
1 |
16 |
unless ($def_hr->{$key}[0]) |
32
|
4 |
12 |
unless (_check_type($val, $def_hr->{$key}[2])) |
37
|
2 |
10 |
unless (_check_class($val, $def_hr->{$key}[1])) |
49
|
2 |
9 |
$def_hr->{$_}[3] ? : |
50
|
1 |
1 |
unless (grep {$req eq $_;} @processed) |
64
|
7 |
9 |
if (ref $type eq 'ARRAY') { } |
66
|
6 |
6 |
if (_check_type_one($value, $_)) |
82
|
12 |
9 |
if (ref $value eq $type or ref \$value eq $type) { } |
96
|
11 |
7 |
if ($class_name) { } |
99
|
3 |
8 |
if (ref $value eq 'ARRAY') { } |
101
|
2 |
4 |
unless (_check_class($_, $class_name)) |
119
|
2 |
6 |
if (not &blessed($class) && $class->isa($class_name)) { } |