| line |
true |
false |
branch |
|
15
|
0 |
0 |
if (defined $params) |
|
18
|
0 |
0 |
if (defined $params->{'comment'}) |
|
22
|
0 |
0 |
if ($key =~ /^_[[:alnum:]]+$/msx) |
|
33
|
0 |
0 |
if (@_ > 1) |
|
34
|
0 |
0 |
if (defined $new) { } |
|
35
|
0 |
0 |
if ($new =~ /^(\d+(?:[.]\d+)?|-1)$/msx) { } |
|
46
|
0 |
0 |
if (defined $old and $old == _DOES_NOT_APPLY()) { } |
|
57
|
0 |
0 |
if (@_ > 1) |
|
58
|
0 |
0 |
if (defined $new) { } |
|
59
|
0 |
0 |
if ($new =~ /^(\d+(?:[.]\d+)?|\-1)$/msx) { } |
|
70
|
0 |
0 |
if (defined $old and $old == _DOES_NOT_APPLY()) { } |
|
81
|
0 |
0 |
if (@_ > 1) |
|
94
|
0 |
0 |
if ($name =~ /^_[[:alnum:]]+$/msx) { } |
|
|
0 |
0 |
elsif ($name eq 'DESTROY') { } |
|
96
|
0 |
0 |
if (@_ > 1) |
|
113
|
0 |
0 |
if (defined $self->on_content_load) { } |
|
119
|
0 |
0 |
if (defined $self->on_load) { } |
|
125
|
0 |
0 |
if (defined $self->comment) |
|
129
|
0 |
0 |
unless defined $self->{$key} |
|
130
|
0 |
0 |
if ($key =~ /^_[[:alnum:]]+$/msx) |