diff options
author | root <root@filebitch> | 2011-08-28 18:28:51 +0200 |
---|---|---|
committer | root <root@filebitch> | 2011-08-28 18:28:51 +0200 |
commit | c8c27e3af96a84ccf8ecdfd7610e49dba0598e7d (patch) | |
tree | 3cb1a59b301f91b6a1524b48fb9d828a78a43dac /kachelmann/changes | |
parent | 99bdbc04f2be1f0d27c4a4dde692e8a5b6eb8a7e (diff) | |
parent | 7a97f9d4baff89bbcfa4bef93ab4d4246b2b82e6 (diff) |
Merge branch 'master' of https://github.com/krebscode/painload
Diffstat (limited to 'kachelmann/changes')
-rw-r--r-- | kachelmann/changes | 24 |
1 files changed, 0 insertions, 24 deletions
diff --git a/kachelmann/changes b/kachelmann/changes deleted file mode 100644 index 1875dabd..00000000 --- a/kachelmann/changes +++ /dev/null @@ -1,24 +0,0 @@ -#!/usr/bin/perl -use XML::Simple; -my $xml = new XML::Simple; -my $xml_store = undef; -my $data_new = undef; -my $data_old = undef; -my $condition_store = undef; - - -my $data_old = $condition_store; -while (1) { - &xml_update(); - $data_new = $condition_store; - if($data_new == $data_old){ - system("espeak Das Wetter hat sich von $data_old in $data_new verändert"); - } - sleep 300; - $data_new = $data_old; -} -sub xml_update(){ - $xml_store = system("w3m -dump \"http://www.google.com/ig/api?weather=70327-stuttgart&hl=de\""); - $xml_store = $xml->XMLin($xml_store); - $condition_store = $xml_store->{weather}->{current_conditions}->{condition}->{data}; -} |