diff options
author | dakkar <dakkar@thenautilus.net> | 2013-05-17 20:47:26 +0100 |
---|---|---|
committer | dakkar <dakkar@thenautilus.net> | 2013-05-17 20:47:26 +0100 |
commit | bf9072da14d1ee8aa0640c250b7051426665c50b (patch) | |
tree | bac6f418331c0f697ad9d2ea4724f2ec8aafe9d2 /forecast-file.pl | |
parent | DateTime fields (diff) | |
download | HomePanel-bf9072da14d1ee8aa0640c250b7051426665c50b.tar.gz HomePanel-bf9072da14d1ee8aa0640c250b7051426665c50b.tar.bz2 HomePanel-bf9072da14d1ee8aa0640c250b7051426665c50b.zip |
data spans
Diffstat (limited to 'forecast-file.pl')
-rw-r--r-- | forecast-file.pl | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/forecast-file.pl b/forecast-file.pl index 8dfd295..950b7e0 100644 --- a/forecast-file.pl +++ b/forecast-file.pl @@ -8,3 +8,11 @@ use Data::Printer; my $res = WebService::ForecastIo::Response->new(file($ARGV[0])->slurp); p $res; + +my $hourly_summary_spans = $res->hourly->spans_by_string('summary'); + +p $hourly_summary_spans; + +my $hourly_temp_spans = $res->hourly->spans_by_number('temperature',1); + +p $hourly_temp_spans; |