line |
true |
false |
branch |
16
|
0 |
43 |
unless (-d $DEV_SHM) |
20
|
22 |
21 |
if ($opts{'file'}) { } |
50
|
0 |
43 |
unless open my $fh5, '>>', $opts{'lock'} |
52
|
0 |
43 |
unless close $fh5 |
56
|
2 |
41 |
if ($opts{'join'} and -f $opts{'file'}) { } |
58
|
0 |
2 |
unless open my $fh6, '+<', $opts{'file'} |
63
|
2 |
39 |
if (-f $opts{'file'}) |
67
|
0 |
41 |
unless open my $fh8, '>>', $opts{'file'} |
69
|
0 |
41 |
unless close $fh8 |
72
|
0 |
41 |
unless open my $fh7, '+<', $opts{'file'} |
85
|
41 |
0 |
if (tell $fh7 < $self->{'_header_size'}) |
89
|
5 |
38 |
if (defined $list) |
90
|
5 |
0 |
if (ref $list eq 'ARRAY') { } |