line |
true |
false |
branch |
14
|
0 |
0 |
if (defined $params) |
16
|
0 |
0 |
if (defined $params->{'params'} and ref $params->{'params'} eq 'ARRAY' and scalar @{$params->{'params'};} > 0) { } |
|
0 |
0 |
elsif (defined $params->{'text'}) { } |
30
|
0 |
0 |
if (defined $params->{'comment'}) |
34
|
0 |
0 |
if ($key =~ /^_[[:alnum:]]+$/msx) |
45
|
0 |
0 |
if (@_ > 1) |
54
|
0 |
0 |
if (@_ > 1) |
64
|
0 |
0 |
if (@_ > 1) |
67
|
0 |
0 |
if (defined $new and ref $new eq 'ARRAY') |
73
|
0 |
0 |
if (defined $old) { } |
84
|
0 |
0 |
if (@_ > 1) |
97
|
0 |
0 |
if ($name =~ /^_[[:alnum:]]+$/msx) { } |
|
0 |
0 |
elsif ($name eq 'DESTROY') { } |
99
|
0 |
0 |
if (@_ > 1) |
118
|
0 |
0 |
if (defined $self->text) |
121
|
0 |
0 |
if (defined $self->comment) |
125
|
0 |
0 |
unless defined $self->{$key} |
126
|
0 |
0 |
if ($key =~ /^_[[:alnum:]]+$/msx) |