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

tolta esecuzione remota - raccolta errori x mail

Browse Source
This commit is contained in:
Alessandro Battilani
2021-12-23 18:15:02 +01:00
parent f8b51c39ac
commit e0eb5d8734
1 changed files with 7 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
LoadCSVData.pl
View File

@@ -57,7 +57,8 @@ my $G301_fcheck = 0;
my $CR1000X_fcheck = 0; my $CR1000X_fcheck = 0;
my $FtpToCustomerCmd = 'SendFtpElabData.pl'; my $FtpToCustomerCmd = 'SendFtpElabData.pl';
my ( $scriptname, $scriptpath ); my ( $scriptname, $scriptpath );
my $MatlabErrorFilename = "/tmp/"; my $MatlabErrorPath = "/tmp/";
my $MatlabErrorFilename = $MatlabErrorPath;
my @matlabOutputErrorArray; my @matlabOutputErrorArray;
my @errors; my @errors;
my @warnings; my @warnings;
@@ -142,10 +143,13 @@ sub matlabCalc {
#my $args = "sh -c \'cd $matlab_func_dir; pwd; $cmd_elab\'"; #my $args = "sh -c \'cd $matlab_func_dir; pwd; $cmd_elab\'";
my $args = my $args = 'cd $matlab_func_dir; $cmd_elab';
"ssh $matlab_exec_user\@$matlab_proxy_ssh -p $matlab_proxy_ssh_port \"sh -c \'cd $matlab_func_dir; $cmd_elab\'\"";
if ( system($args) != 0 ) { if ( system($args) != 0 ) {
my $argscat =
"cd $MatlabErrorPath; cat _${unit}_${tool}*_\*_output_error.txt > ${unit}${tool}_output_error.txt";
system($argscat);
open( my $fh, '<', $MatlabErrorFilename ) open( my $fh, '<', $MatlabErrorFilename )
or warn print getTimeStamp("log") or warn print getTimeStamp("log")
. " - pid $$ >> Cannot open Matlab output error file: ${MatlabErrorFilename}\n"; . " - pid $$ >> Cannot open Matlab output error file: ${MatlabErrorFilename}\n";