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

aggiunto N/A

Browse Source
This commit is contained in:
battilo
2018-11-19 23:25:19 +01:00
parent f0ab80f719
commit 7a018175e1
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
LoadCSVData.pl
View File

@@ -500,6 +500,8 @@ while ( my $line = <FILE> ) {
$CSVData[$idx++] = $Din1 . ";" . $Din2; $CSVData[$idx++] = $Din1 . ";" . $Din2;
} elsif ($ain[i] eq 2) { } elsif ($ain[i] eq 2) {
$CSVData[$idx++] = $Ain1 . ";" . $Ain2; $CSVData[$idx++] = $Ain1 . ";" . $Ain2;
} else {
$CSVData[$idx++] = "N/A";
} }
} }