mirror of
https://github.com/derf/travelynx
synced 2024-12-05 18:59:09 +00:00
dumpstops: encode output as UTF-8
This commit is contained in:
parent
875ec1c3e5
commit
a72b6192ed
1 changed files with 2 additions and 1 deletions
|
@ -20,7 +20,8 @@ sub run {
|
||||||
$self->help;
|
$self->help;
|
||||||
}
|
}
|
||||||
elsif ( $command eq 'csv' ) {
|
elsif ( $command eq 'csv' ) {
|
||||||
open( my $fh, '>', $filename ) or die("open($filename): $!\n");
|
open( my $fh, '>:encoding(utf-8)', $filename )
|
||||||
|
or die("open($filename): $!\n");
|
||||||
|
|
||||||
my $csv = Text::CSV->new( { eol => "\r\n" } );
|
my $csv = Text::CSV->new( { eol => "\r\n" } );
|
||||||
$csv->combine(qw(name eva lat lon source archived));
|
$csv->combine(qw(name eva lat lon source archived));
|
||||||
|
|
Loading…
Reference in a new issue