| line |
true |
false |
branch |
|
13
|
0 |
0 |
if (defined $params) |
|
16
|
0 |
0 |
if (defined $params->{'comment'}) |
|
20
|
0 |
0 |
if ($key =~ /^_[[:alnum:]]+$/msx) |
|
31
|
0 |
0 |
if (@_ > 1) |
|
32
|
0 |
0 |
if (defined $new) { } |
|
39
|
0 |
0 |
if (defined $old and $old eq 'Unknown') { } |
|
50
|
0 |
0 |
if (@_ > 1) |
|
51
|
0 |
0 |
if (defined $new) { } |
|
58
|
0 |
0 |
if (defined $old and $old eq 'Unknown') { } |
|
69
|
0 |
0 |
if (@_ > 1) |
|
82
|
0 |
0 |
if ($name =~ /^_[[:alnum:]]+$/msx) { } |
|
|
0 |
0 |
elsif ($name eq 'DESTROY') { } |
|
84
|
0 |
0 |
if (@_ > 1) |
|
101
|
0 |
0 |
if (defined $self->name) { } |
|
107
|
0 |
0 |
if (defined $self->version) { } |
|
113
|
0 |
0 |
if (defined $self->comment) |
|
117
|
0 |
0 |
unless defined $self->{$key} |
|
118
|
0 |
0 |
if ($key =~ /^_[[:alnum:]]+$/msx) |