Mercurial > hg > egg-tcls
changeset 389:365104ed353c
Merged.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Wed, 10 Feb 2016 17:17:17 +0200 |
parents | 61e1e2118595 (current diff) ff3037bc6efc (diff) |
children | 523ecc0ef8d1 |
files | |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/fetch_weather.pl Wed Feb 10 17:16:34 2016 +0200 +++ b/fetch_weather.pl Wed Feb 10 17:17:17 2016 +0200 @@ -351,8 +351,8 @@ # Parse the data .. my $meta_data = {}; - my $csv = Text::CSV->new({blank_is_undef => 1, decode_utf8 => 1, sep_char => ";"}); -# my $csv = Text::CSV->new({blank_is_undef => 1}); +# my $csv = Text::CSV->new({blank_is_undef => 1, decode_utf8 => 1, sep_char => ";"}); + my $csv = Text::CSV->new({blank_is_undef => 1, sep_char => ";"}); die("Failed to instantiate Text::CSV object?\n") unless defined($csv); foreach my $line (split(/\s*\n\s*/, $meta_str))