line |
true |
false |
branch |
60
|
0 |
0 |
unless $self->brik_help_run_undef_arg("save_as_csv", $output_file) |
62
|
0 |
0 |
unless my $fc = "Metabrik::File::Csv"->new_from_brik_init($self) |
65
|
0 |
0 |
if (-f $output_file) |
66
|
0 |
0 |
unless my $fs = "Metabrik::System::File"->new_from_brik_init($self) |
67
|
0 |
0 |
unless $fs->remove($output_file) |
71
|
0 |
0 |
unless my $list = $self->telnet |
82
|
0 |
0 |
unless $fc->write(\@lines, $output_file) |
91
|
0 |
0 |
unless $self->brik_help_run_undef_arg("save_as_couple", $output_file) |
93
|
0 |
0 |
unless my $ft = "Metabrik::File::Text"->new_from_brik_init($self) |
95
|
0 |
0 |
if (-f $output_file) |
96
|
0 |
0 |
unless my $fs = "Metabrik::System::File"->new_from_brik_init($self) |
97
|
0 |
0 |
unless $fs->remove($output_file) |
101
|
0 |
0 |
unless my $list = $self->telnet |
109
|
0 |
0 |
unless $ft->write(\@lines, $output_file) |