| line |
true |
false |
branch |
|
16
|
0 |
2 |
unless my $q = shift() |
|
19
|
1 |
1 |
unless $cmd |
|
31
|
0 |
3 |
unless my $q = shift() |
|
38
|
1 |
2 |
unless $file |
|
40
|
0 |
2 |
unless $file =~ m[^/] |
|
41
|
0 |
2 |
unless -e $file |
|
44
|
0 |
2 |
unless open my $fh, $file |
|
49
|
0 |
2 |
unless close $fh |
|
51
|
1 |
1 |
if $raw |
|
59
|
0 |
7 |
unless my $q = shift() |
|
61
|
2 |
5 |
if ($q->param('clear_state')) |
|
68
|
2 |
3 |
unless $key |
|
69
|
2 |
1 |
unless ($value) |
|
71
|
1 |
1 |
unless defined $val |
|
78
|
0 |
1 |
if ($@) |
|
91
|
2 |
1 |
if (-e $statefile) |
|
93
|
0 |
2 |
unless open my $fh, $statefile |
|
95
|
0 |
2 |
unless close $fh |
|
101
|
2 |
1 |
$key ? : |
|
110
|
0 |
1 |
unless open my $fh, ">$tmpstate" |
|
112
|
0 |
1 |
unless close $fh |
|
113
|
0 |
1 |
unless rename $tmpstate, $statefile |