| line |
true |
false |
branch |
|
50
|
0 |
0 |
unless my $fr = "Metabrik::File::Read"->new_from_brik_init($self) |
|
56
|
0 |
0 |
unless $fr->open |
|
69
|
0 |
0 |
unless $self->brik_help_run_undef_arg("read", $input) |
|
71
|
0 |
0 |
unless my $fr = $self->_open($input) |
|
72
|
0 |
0 |
unless my $data = $fr->read |
|
89
|
0 |
0 |
unless $self->brik_help_run_undef_arg("read_line", $input) |
|
90
|
0 |
0 |
unless $self->brik_help_run_file_not_found("read_line", $input) |
|
93
|
0 |
0 |
unless ($fr) |
|
94
|
0 |
0 |
unless $fr = $self->_open($input) |
|
98
|
0 |
0 |
if ($fr->eof) |
|
106
|
0 |
0 |
if ($count > 1) { } |
|
116
|
0 |
0 |
$count > 1 ? : |
|
127
|
0 |
0 |
unless $self->brik_help_run_undef_arg("read_split_by_blank_line", $input) |
|
129
|
0 |
0 |
unless my $fr = $self->_open($input) |
|
134
|
0 |
0 |
if $fr->eof |
|
148
|
0 |
0 |
unless $self->brik_help_run_undef_arg("read_split_by_ini_block", $input) |
|
150
|
0 |
0 |
unless my $fr = $self->_open($input) |
|
157
|
0 |
0 |
if $fr->eof |
|
171
|
0 |
0 |
unless $self->brik_help_run_undef_arg("write", $data) |
|
172
|
0 |
0 |
unless $self->brik_help_run_undef_arg("write", $output) |
|
174
|
0 |
0 |
unless $self->open($output) |
|
177
|
0 |
0 |
unless (defined $r) |
|
189
|
0 |
0 |
if (defined $r and $r == 0 and not defined $self->_fr) |