alex/ase_perl
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

errore ctrl send ftp e query sxclude anchor e none

Browse Source
This commit is contained in:
Alessandro Battilani
2021-11-28 15:39:38 +01:00
parent a5292ae9cb
commit ff3da9be7f
2 changed files with 7 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
SendFtpElabData.pl
View File

@@ -72,7 +72,7 @@ sub trxelab {
my $fileelab;
if ( !defined($ftp_filename) or $ftp_filename eq "" ) {
if ( !defined $ftp_filename or $ftp_filename eq "" ) {
$fileelab =
'/var/lib/mysql-files/'
. $tool . '_'
@@ -123,8 +123,7 @@ sub trxelab {
print getTimeStamp("log") . " - pid $$ >> $unit - $tool ftp parm:\n";
while ( my ( $key, $value ) = each(%ftp_parms) ) {
print getTimeStamp("log")
. " - pid $$ >> - $key = $ftp_parms{$key}\n";
print getTimeStamp("log") . " - pid $$ >> - $key = $ftp_parms{$key}\n";
}
if ( !defined $duedate
@@ -195,4 +194,4 @@ if ( $tool eq 'DT0076' ) {
trxelab();
print getTimeStamp("log") . " - pid $$ >> Execution ended.\n";
exit;
exit;