Ubuntu-fr

Gillaume

Script Perl pour la météo dans Fvwm

Salut à tous,

j'ai téléchargé une config sur le site :
http://fabthedude.free.fr/fvwm/configs/

et je me retrouve avec les script perl "weather_log.plx"
qui contient ceci

#!/usr/bin/perl
use strict;
use LWP::Simple;
my $content = get("http://www.w3.weather.com/weather/print/FRXX0114");
$content =~ s/.*<!-- begin loop -->(.*)<!-- end loop -->.*/$1/s;
my @day = split /<TR>/, $content;
shift @day;
my ($day, $date, $img, $temp, $precip);
my $tomorrow;
foreach $_ (@day) {
	($day) = /(\w+)<\/A>/s;
	($date) = /<BR> (.+?)</s;
	($img) = /(\d+)\.gif/s;
	$img = $ARGV[0] . $img . '.png';
	($temp) = /<B>(.*?)<\/B>/s;
	$temp =~ s/&deg;/chr(186)/eg;
	$temp =~ s|(\d+)|sprintf "%d", ($1 - 32) * 5 / 9|eg;
	($precip) = /(\d+ %)/;
	print $img . "\n" . $temp . "C\n" . $precip . "\n";
}

le pb vient de "http://www.w3.weather.com/weather/print/FRXX0114" , qui n'est plus une adresse valide.

en cherchant , je suis tombé sur ça :
http://www.weather.com/outlook/travel/b … rom=search

mais ça marche pas, en la remplaçant... 

quelqu'un peut m'aider ?

ps : ça donnerait ceci
http://fabthedude.free.fr/fvwm/screensh … enshot.jpg
Merci
Guillaume

Dernière modification par Gillaume (Le 29/06/2007, à 23:20)

---

Guili Guili

Gillaume

Re : Script Perl pour la météo dans Fvwm

up up ?     

---

Guili Guili

jackosking

Re : Script Perl pour la météo dans Fvwm

il faut que tu trouves une page qui donne la météo et que tu changes l'expression régulière.

Gillaume

Re : Script Perl pour la météo dans Fvwm

SAlut

bien sur, c'est que je cherche, mais la précédente page devait pointer vers une image bien précise; que je ne retrouve pas ....

---

Guili Guili