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