| line |
true |
false |
branch |
|
13
|
0 |
0 |
if (defined $params) |
|
14
|
0 |
0 |
if (defined $params->{'expires'}) |
|
20
|
0 |
0 |
if (defined $params->{'comment'}) |
|
24
|
0 |
0 |
if ($key =~ /^_[[:alnum:]]+$/msx) |
|
35
|
0 |
0 |
if (@_ > 1) |
|
44
|
0 |
0 |
if (@_ > 1) |
|
45
|
0 |
0 |
if (defined $new) { } |
|
49
|
0 |
0 |
if ($new =~ /^${date_regex}T$time_regex$zone_regex$/msx) { } |
|
60
|
0 |
0 |
if (defined $old and $old eq '0000-00-00T00-00-00') { } |
|
71
|
0 |
0 |
if (@_ > 1) |
|
74
|
0 |
0 |
if (defined $old) { } |
|
85
|
0 |
0 |
if (@_ > 1) |
|
88
|
0 |
0 |
if (defined $old) { } |
|
99
|
0 |
0 |
if (@_ > 1) |
|
112
|
0 |
0 |
if ($name =~ /^_[[:alnum:]]+$/msx) { } |
|
|
0 |
0 |
elsif ($name eq 'DESTROY') { } |
|
114
|
0 |
0 |
if (@_ > 1) |
|
131
|
0 |
0 |
if (defined $self->expires) |
|
134
|
0 |
0 |
if ($self->last_access) { } |
|
142
|
0 |
0 |
if (defined $self->comment) |
|
146
|
0 |
0 |
unless defined $self->{$key} |
|
147
|
0 |
0 |
if ($key =~ /^_[[:alnum:]]+$/msx) |