mirror of https://github.com/ecmwf/eccodes.git
Scripts: Remove DOS carriage returns
This commit is contained in:
parent
13127f1739
commit
a14dad0046
|
@ -57,6 +57,7 @@ write_or_append(\*OUT_CFVARNAME, "$CFVARNAME_FILENAME");
|
|||
my $first = 1;
|
||||
while (<>) {
|
||||
chomp;
|
||||
s/\r//g; # Remove DOS carriage returns
|
||||
if ($first == 1) {
|
||||
check_first_row_column_names($_);
|
||||
$first = 0;
|
||||
|
|
Loading…
Reference in New Issue