| line |
true |
false |
branch |
|
82
|
0 |
1854 |
if $short =~ /^\+/ |
|
85
|
0 |
1854 |
if $short =~ /^IO::K8s::/ |
|
88
|
1850 |
4 |
if ($short =~ /^([A-Z][a-z]+)::/) |
|
90
|
1846 |
4 |
if (my $expansion = $_class_prefix{$prefix}) |
|
109
|
4896 |
9 |
unless $name =~ /[^a-zA-Z0-9_]/ |
|
122
|
1075 |
3830 |
unless exists $_attr_registry{$caller} |
|
126
|
699 |
4206 |
$required_marker && $required_marker eq 'required' ? : |
|
129
|
0 |
4905 |
if (not ref $type_spec || _is_type_tiny($type_spec) and $type_spec =~ s/!$//) { } |
|
|
0 |
5153 |
elsif (ref $type_spec eq 'ARRAY' and not _is_type_tiny($type_spec->[0]) and $type_spec->[0] =~ s/!$//) { } |
|
136
|
2374 |
2531 |
if (_is_type_tiny($type_spec)) { } |
|
|
1389 |
1142 |
elsif (not ref $type_spec) { } |
|
|
727 |
415 |
elsif (ref $type_spec eq 'ARRAY') { } |
|
|
415 |
0 |
elsif (ref $type_spec eq 'HASH') { } |
|
138
|
2374 |
0 |
if ($flags) |
|
140
|
521 |
1853 |
$required ? : |
|
143
|
19 |
1370 |
if (my $flags = $TYPE_FLAGS{$type_spec}) { } |
|
146
|
0 |
19 |
$required ? : |
|
151
|
118 |
1252 |
$required ? : |
|
156
|
248 |
479 |
if (_is_type_tiny($inner)) { } |
|
|
1 |
478 |
elsif ($inner eq 'Str') { } |
|
|
0 |
478 |
elsif ($inner eq 'Int') { } |
|
158
|
243 |
5 |
if ($type_name eq 'Str') { } |
|
|
5 |
0 |
elsif ($type_name eq 'Int') { } |
|
163
|
31 |
217 |
$required ? : |
|
166
|
0 |
1 |
$required ? : |
|
169
|
0 |
0 |
$required ? : |
|
174
|
29 |
449 |
$required ? : |
|
178
|
409 |
6 |
if ($inner eq 'Str') { } |
|
182
|
0 |
409 |
$required ? : |
|
187
|
0 |
6 |
$required ? : |
|
193
|
9 |
4896 |
if $attr_name ne $json_key |
|
201
|
321 |
4584 |
if $caller->can($attr_name) |
|
205
|
699 |
3885 |
$required ? : |
|
|
9 |
4575 |
$attr_name ne $json_key ? : |