diff options
author | Daniel Friesel <derf@finalrewind.org> | 2019-11-19 21:50:23 +0100 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2019-11-19 21:50:23 +0100 |
commit | 48f6dcd45adec36b6e48c1913e03eb6ed8f9e133 (patch) | |
tree | d44348a951502ad1b983740c4e95fca48ca47a6e /share/json2csv | |
parent | 33ce867b1bd4abb8fc9dde049507937182b9c6e3 (diff) |
Rename UIC to EVA. EVA IDs are often (but not always!) UIC IDs
Diffstat (limited to 'share/json2csv')
-rwxr-xr-x | share/json2csv | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/share/json2csv b/share/json2csv index 0601f96..49aead9 100755 --- a/share/json2csv +++ b/share/json2csv @@ -14,11 +14,11 @@ my $csv = Text::CSV->new( { eol => "\n" } ); my $buf = ''; -$csv->combine( 'name', 'DS100', 'UIC (IBNR)', 'Latitude', 'Longitude' ); +$csv->combine( 'name', 'DS100', 'EVA (not always identical with UIC ID)', 'Latitude', 'Longitude' ); $buf .= $csv->string; for my $station ( @{$stations} ) { - my @fields = ( $station->{name}, $station->{ds100}, $station->{uic} ); + my @fields = ( $station->{name}, $station->{ds100}, $station->{eva} ); if ( $station->{latlong} ) { push( @fields, $station->{latlong}[0], $station->{latlong}[1] ); } |