From 37f8482d2c24d6b1a12a7f409f1b86a8e3857fe8 Mon Sep 17 00:00:00 2001
From: dakkar <dakkar@thenautilus.net>
Date: Fri, 23 Aug 2013 10:43:30 +0100
Subject: return just json for forecast

---
 forecast.pl | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

(limited to 'forecast.pl')

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;
-- 
cgit v1.2.3