line |
true |
false |
branch |
26
|
0 |
35 |
unless Storable::nstore_fd($init, $self->{'fh'}) |
33
|
54 |
0 |
if (my $cb = $self->{'callback_on_open'}) |
36
|
0 |
54 |
unless sysopen my $fh, $self->{'filename'}, 66 |
50
|
0 |
1522 |
unless seek $self->{'fh'}, 0, 0 |
59
|
0 |
495 |
unless seek $self->{'fh'}, 0, 0 |
64
|
0 |
495 |
unless seek $self->{'fh'}, 0, 0 |
65
|
0 |
495 |
unless Storable::nstore_fd($dat, $self->{'fh'}) |
75
|
19 |
4087 |
if ($self->{'pid'} != $$) |
77
|
0 |
19 |
if ($self->{'lock'} > 0) |
78
|
0 |
0 |
unless flock $self->{'fh'}, 8 |
88
|
0 |
0 |
if ($self->{'ppid'} eq $$) |
103
|
640 |
1449 |
if ($store->{'lock'}++ == 0) |
104
|
0 |
640 |
unless flock $store->{'fh'}, 2 |
114
|
640 |
1449 |
if ($self->{'store'}{'lock'} == 0) |
115
|
0 |
640 |
unless flock $self->{'store'}{'fh'}, 8 |