package Weather::Meteo;
use strict;
use warnings;
use Carp;
use CHI;
use JSON::MaybeXS;
use LWP::UserAgent;
use Scalar::Util;
use Time::HiRes;
use URI;
use constant FIRST_YEAR => 1940;
=head1 NAME
d to decode correctly
my $rc;
eval { $rc = JSON::MaybeXS->new()->utf8()->decode($res->decoded_content()) };
if($@) {
Carp::carp("Failed to parse JSON response: $@");
return;
}
if($rc) {
i