| line |
true |
false |
branch |
|
42
|
0 |
0 |
unless $self->brik_help_run_undef_arg("read", $input) |
|
44
|
0 |
0 |
unless my $fr = "Metabrik::File::Read"->new_from_brik_init($self) |
|
50
|
0 |
0 |
unless $fr->open |
|
51
|
0 |
0 |
unless my $data = $fr->read |
|
59
|
0 |
0 |
if (/^$/) |
|
66
|
0 |
0 |
if (length $buf) |
|
74
|
0 |
0 |
if ($@) |
|
90
|
0 |
0 |
unless $self->brik_help_run_undef_arg("write", $data) |
|
91
|
0 |
0 |
unless $self->brik_help_run_undef_arg("write", $output) |
|
95
|
0 |
0 |
unless $self->open($output) |
|
97
|
0 |
0 |
if (ref $data eq 'ARRAY') { } |
|
100
|
0 |
0 |
unless (defined $r) |
|
107
|
0 |
0 |
unless (defined $r) |