line |
true |
false |
branch |
22
|
1 |
1 |
$$self{'readonly'} ? : |
|
0 |
2 |
$$self{'create_file'} ? : |
|
0 |
2 |
unless $$self{'_fh'} = 'IO::File'->new($$self{'filename'}, ($$self{'readonly'} ? 0 : 2) | ($$self{'create_file'} ? 64 : 0)) |
52
|
4 |
10 |
if ($line =~ /^\s*$COMM/) { } |
|
2 |
8 |
elsif ($line =~ /^\s*$/) { } |
|
8 |
0 |
elsif ($line =~ /$SEP/) { } |
105
|
3 |
28 |
if $$item{'deleted'} |
126
|
0 |
2 |
unless (defined $$self{'filename'}) |
151
|
1 |
2 |
if ($$self{'readonly'}) |
155
|
1 |
1 |
if (exists $$self{'_cache'}{'values'}{$key}) { } |
184
|
0 |
2 |
if ($$self{'readonly'}) |
228
|
0 |
1 |
if $count |