| line |
true |
false |
branch |
|
27
|
0 |
70 |
if keys %attrs |
|
28
|
34 |
36 |
if $self->{'parent'} |
|
31
|
0 |
0 |
if defined $_->{'shortname'} |
|
51
|
0 |
10552 |
unless $self->is_valid_name($name) |
|
54
|
10516 |
36 |
if $self->is_valid_shortname($name) |
|
58
|
0 |
10552 |
if defined $$by_name{lc $name} |
|
59
|
10516 |
36 |
if (defined $attrs{'shortname'}) |
|
64
|
0 |
10516 |
if $$slot |
|
86
|
0 |
36 |
unless length $name |
|
89
|
34 |
2 |
$ext_pos < 0 ? : |
|
90
|
34 |
2 |
$ext_pos < 0 ? : |
|
96
|
2 |
34 |
if length $ext |
|
98
|
1 |
35 |
if (not $base_len or $base_len > 8) |
|
105
|
0 |
36 |
if $iter_pos < 0 |
|
110
|
0 |
36 |
unless $self->is_valid_shortname($base . $ext) |
|
118
|
36 |
10517 |
unless (defined $_->{'shortname'}) |