diff options
author | Gianni Ceccarelli <gianni.ceccarelli@net-a-porter.com> | 2013-05-30 07:37:30 +0100 |
---|---|---|
committer | Gianni Ceccarelli <gianni.ceccarelli@net-a-porter.com> | 2013-05-30 07:37:30 +0100 |
commit | 96db5e7f38749b821ac0bca77128fa5890e6ed01 (patch) | |
tree | c2558961ea7c1af70e073eb77a4987d96f1b2216 /forecast.pl | |
parent | show predicted arrivals (diff) | |
download | HomePanel-96db5e7f38749b821ac0bca77128fa5890e6ed01.tar.gz HomePanel-96db5e7f38749b821ac0bca77128fa5890e6ed01.tar.bz2 HomePanel-96db5e7f38749b821ac0bca77128fa5890e6ed01.zip |
return json response
Diffstat (limited to 'forecast.pl')
-rw-r--r-- | forecast.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/forecast.pl b/forecast.pl index 1ff4754..fd47323 100644 --- a/forecast.pl +++ b/forecast.pl @@ -12,10 +12,12 @@ my $fio = WebService::ForecastIo->new({ api_key => $key, }); -my $response = $fio->request({ +my ($response,$json) = $fio->request({ latitude => 51.54, longitude => -0.37, exclude => ['minutely','flags'], }); +say $json; + p $response; |