Mercurial > hg > egg-tcls
changeset 398:6419327df9e7
fetch_weather: Cosmetic.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Thu, 05 Jan 2017 23:18:28 +0200 |
parents | 799320c3386e |
children | a80de0130e45 |
files | fetch_weather.pl |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/fetch_weather.pl Thu Jan 05 23:16:46 2017 +0200 +++ b/fetch_weather.pl Thu Jan 05 23:18:28 2017 +0200 @@ -354,7 +354,7 @@ # 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)) { if (defined($line) && $csv->parse($line))