allineato a cloud script
This commit is contained in:
@@ -519,7 +519,6 @@ while ( my $line = <FILE> ) {
|
||||
getNodesType();
|
||||
$CR1000X_fcheck = 1;
|
||||
}
|
||||
|
||||
if ( $unittype eq 'G301' and $G301_fcheck eq 0 ) {
|
||||
print getTimeStamp("log")
|
||||
. " - pid $$ >> Found $tooltype tool name: $tool\n";
|
||||
@@ -542,16 +541,9 @@ while ( my $line = <FILE> ) {
|
||||
foreach my $ch (@channels) {
|
||||
$CSVData[ $idx++ ] =
|
||||
join( ';', splice( @NewData, 0, $ch ) );
|
||||
|
||||
}
|
||||
}
|
||||
|
||||
#print Dumper \@CSVData;
|
||||
#print Dumper \@channels;
|
||||
#print Dumper \@din;
|
||||
|
||||
}
|
||||
|
||||
elsif ( $tooltype eq "CR1000X" )
|
||||
{ # può essere tolto per attivarlo
|
||||
@CSVData = split( /\|/, $NodeData );
|
||||
|
||||
Reference in New Issue
Block a user