blib/lib/Tie/ConfigFile.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 12 | 20 | 60.0 |
line | true | false | branch |
---|---|---|---|
22 | 1 | 0 | if $$self{'die_on_error'} |
30 | 2 | 1 | $$self{'readonly'} ? : |
0 | 3 | $$self{'create_file'} ? : | |
0 | 3 | unless $$self{'_fh'} = 'IO::File'->new($$self{'filename'}, ($$self{'readonly'} ? 0 : 2) | ($$self{'create_file'} ? 64 : 0)) | |
47 | 0 | 3 | unless defined $$self{'_fh'} or $self->__init |
93 | 0 | 3 | unless (defined $$self{'filename'}) |
109 | 2 | 7 | if defined $val and $val eq '' and $$self{'empty_is_undef'} |
116 | 1 | 3 | if ($$self{'readonly'}) |
130 | 0 | 0 | if ($$self{'readonly'}) |
172 | 0 | 3 | if $count |