line |
true |
false |
branch |
38
|
1 |
0 |
defined $params{'print_mode'} ? : |
53
|
0 |
1 |
grep(/$print_mode/, ('FTP', 'LPR')) ? : |
103
|
0 |
1 |
unless $$self{'check_syntax'}($$self{'output_data'}) |
107
|
0 |
1 |
unless $self->can("$method") |
126
|
0 |
1 |
unless $$H_TEMPLATES{$script_language} |
130
|
0 |
1 |
unless $self->can("$method") |
144
|
0 |
0 |
unless $script |
176
|
0 |
1 |
unless $tt->process($script_file, $$self{'vars'}, \$output_data) |
203
|
0 |
0 |
unless my $session = 'Net::FTP'->new($$self{'server'}, 'Passive', 0, 'Debug', 0) |
208
|
0 |
0 |
unless $session->login($$self{'user'}, $$self{'password'}) |
215
|
0 |
0 |
unless open my $output_file, '<', \$$self{'output_data'} |
216
|
0 |
0 |
unless $session->put($output_file, 'OUTPUT.TXT') |
233
|
0 |
0 |
if defined $$self{'port'} |
237
|
0 |
0 |
unless $res |
249
|
0 |
0 |
unless write_file($$self{'output_file'}, \$$self{'output_data'}) |