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) |