| line |
true |
false |
branch |
|
25
|
3 |
1891 |
unless $self->can('PROPERTIES') |
|
29
|
9312 |
1037 |
unless $_ =~ /^-/ |
|
33
|
4839 |
5510 |
if ref $args eq 'HASH' and defined $$args{$prop} |
|
47
|
9040 |
272 |
if $pkg->can($property) |
|
55
|
13564 |
8230 |
if (@_) |
|
56
|
1 |
13563 |
if defined $value and $value eq '' |
|
59
|
13550 |
8244 |
unless defined wantarray |
|
60
|
1927 |
6317 |
if wantarray and ref $$self{$property} eq 'ARRAY' |
|
62
|
5 |
6312 |
if wantarray and ref $$self{$property} eq 'HASH' |
|
83
|
748 |
10 |
if (ref $args) |
|
84
|
3 |
745 |
unless ref $args eq 'HASH' and keys %$args |
|
85
|
5 |
740 |
unless grep /^name$/, keys %$args |
|
86
|
2 |
738 |
unless $$args{'name'} |
|
92
|
3 |
745 |
unless $name |
|
94
|
3 |
742 |
unless $name =~ /^[\w\[\]-]+$/ |
|
106
|
161 |
282 |
unless defined $value |
|
108
|
265 |
0 |
unless eval "1 || $blank" |
|
117
|
64 |
1614 |
if ref $begin eq 'ARRAY' |
|
121
|
881 |
797 |
if not defined $end and @_ == 1 |
|
122
|
923 |
755 |
if (@_) |
|
128
|
754 |
1 |
if $$self{'error_decoration'} |
|
129
|
100 |
655 |
if defined $begin or defined $end |