diff options
| author | dakkar <dakkar@thenautilus.net> | 2013-08-23 10:43:30 +0100 |
|---|---|---|
| committer | dakkar <dakkar@thenautilus.net> | 2013-08-23 10:43:30 +0100 |
| commit | 37f8482d2c24d6b1a12a7f409f1b86a8e3857fe8 (patch) | |
| tree | dd1ef737689c91d642ec8ff5a67de3b59b952169 /forecast.pl | |
| parent | minor css adjustment (diff) | |
| download | HomePanel-37f8482d2c24d6b1a12a7f409f1b86a8e3857fe8.tar.gz HomePanel-37f8482d2c24d6b1a12a7f409f1b86a8e3857fe8.tar.bz2 HomePanel-37f8482d2c24d6b1a12a7f409f1b86a8e3857fe8.zip | |
return just json for forecast
Diffstat (limited to 'forecast.pl')
| -rw-r--r-- | forecast.pl | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/forecast.pl b/forecast.pl index fd47323..c8d6e58 100644 --- a/forecast.pl +++ b/forecast.pl @@ -12,12 +12,11 @@ my $fio = WebService::ForecastIo->new({ api_key => $key, }); -my ($response,$json) = $fio->request({ +my $json = $fio->request({ latitude => 51.54, longitude => -0.37, - exclude => ['minutely','flags'], + exclude => ['flags'], + raw => 1, }); say $json; - -p $response; |