| line |
true |
false |
branch |
|
405
|
79 |
0 |
defined $_[0] ? : |
|
408
|
0 |
79 |
unless ref $opt eq 'HASH' |
|
411
|
22 |
57 |
exists $$opt{'allow_empty'} ? : |
|
414
|
21 |
58 |
if (exists $$opt{'allow_isa'}) { } |
|
415
|
0 |
21 |
unless ref $$opt{'allow_isa'} eq 'ARRAY' |
|
423
|
12 |
67 |
if (exists $$opt{'allow_ref'}) { } |
|
424
|
0 |
12 |
unless ref $$opt{'allow_ref'} eq 'ARRAY' |
|
432
|
22 |
57 |
if (exists $$opt{'allow_rx'}) { } |
|
433
|
0 |
22 |
unless ref $$opt{'allow_rx'} eq 'ARRAY' |
|
441
|
8 |
71 |
if (exists $$opt{'allow_value'}) { } |
|
442
|
0 |
8 |
unless ref $$opt{'allow_value'} eq 'ARRAY' |
|
515
|
43 |
6 |
defined $self->get_short_description ? : |
|
544
|
43 |
6 |
defined $self->get_short_description ? : |
|
545
|
16 |
33 |
defined $self->get_default_value ? : |
|
546
|
36 |
13 |
$self->is_allow_empty ? : |
|
549
|
0 |
49 |
defined $attr_overl ? : |
|
560
|
13 |
36 |
unless ($self->is_allow_empty) |
|
588
|
28 |
21 |
if ($clauses) |
|
711
|
144 |
76 |
if ($$self{'PerlBean_Attribute_Single'}{'allow_empty'}) { } |
|
723
|
51 |
0 |
unless scalar $self->values_allow_isa or scalar $self->values_allow_ref or scalar $self->values_allow_rx or scalar $self->values_allow_value |
|
754
|
21 |
7 |
unless scalar $self->values_allow_isa |
|
786
|
23 |
5 |
unless scalar $self->values_allow_ref |
|
790
|
3 |
2 |
scalar $self->values_allow_isa ? : |
|
822
|
9 |
19 |
unless scalar $self->values_allow_rx |
|
826
|
0 |
19 |
scalar($self->values_allow_isa || $self->values_allow_ref) ? : |
|
859
|
26 |
2 |
unless scalar $self->values_allow_value |
|
863
|
2 |
0 |
scalar($self->values_allow_isa || $self->values_allow_ref || $self->values_allow_rx) ? : |
|
895
|
57 |
22 |
if (shift()) { } |
|
907
|
0 |
79 |
unless &_value_is_allowed('allow_isa', @_) |
|
922
|
0 |
79 |
unless &_value_is_allowed('allow_ref', @_) |
|
937
|
0 |
79 |
unless &_value_is_allowed('allow_rx', @_) |
|
952
|
0 |
79 |
unless &_value_is_allowed('allow_value', @_) |
|
994
|
65 |
25 |
unless scalar $self->values_allow_isa |
|
1004
|
74 |
12 |
unless scalar $self->values_allow_ref |
|
1021
|
59 |
27 |
unless scalar $self->values_allow_rx |
|
1032
|
73 |
8 |
unless scalar $self->values_allow_value |
|
1055
|
5 |
44 |
$self->is_mandatory ? : |
|
1056
|
16 |
33 |
defined $self->get_default_value ? : |
|
1060
|
5 |
44 |
if ($self->is_mandatory) |
|
1066
|
5 |
44 |
if ($self->is_mandatory) { } |
|
1072
|
16 |
28 |
if (defined $self->get_default_value) { } |
|
1094
|
0 |
110 |
unless $self->is_documented |
|
1099
|
15 |
95 |
$self->is_mandatory ? : |
|
1101
|
25 |
85 |
if (defined $self->get_default_value) |
|
1117
|
47 |
18 |
unless defined $self->get_default_value |