--- a/fetch_weather.pl	Sun Oct 04 14:21:22 2015 +0300
+++ b/fetch_weather.pl	Sun Oct 04 14:22:20 2015 +0300
@@ -56,7 +56,7 @@
   $agent->timeout(20);
 
   my $req = HTTP::Request->new(GET => $_[0]);
-  
+
   return $agent->request($req);
 }
 
@@ -305,7 +305,7 @@
         my $uri = "https://raw.githubusercontent.com/finnishtransportagency/metadata/master/csv/meta_traffic_stations.csv";
         my $res = fetch_http($uri);
         die("Failed to fetch $uri data.\n") unless ($res->code <= 200 && $res->code <= 201);
-        
+
         print STDERR "Storing to cache '$meta_file'.\n" if (opt_get_int("debug") > 0);
         $meta_str = $res->decoded_content;
         write_file($meta_file, {binmode => ':utf8'}, $meta_str);
@@ -380,7 +380,7 @@
   {
     my $xml = XMLin($res->decoded_content);
     my $time_base = time();
-    
+
     if (defined($xml->{"wfs:member"}{"omso:GridSeriesObservation"}))
     {
       my $fdata = $xml->{"wfs:member"}{"omso:GridSeriesObservation"};
@@ -395,7 +395,7 @@
         }
       }
 
-      my $findex = 0;    
+      my $findex = 0;
       foreach my $fline (split(/\n/, $fshit->{"gml:rangeSet"}{"gml:DataBlock"}{"gml:doubleOrNilReasonTupleList"}))
       {
         my @fmatches = ($fline =~ /\s*([\+\-]?\d+\.\d*|NaN)\s*/ig);
@@ -411,7 +411,7 @@
         }
       }
       # XXX Hashify the array into lat/long keys
-      
+
       # This is horrible :S
       my $fcrap = $fdata->{"om:featureOfInterest"}{"sams:SF_SpatialSamplingFeature"}{"sams:shape"}{"gml:MultiPoint"}{"gml:pointMember"};
       foreach my $xnode (@{$fcrap})