Help for this page
#!/usr/bin/perl use Geo::Weather; ... $weather->get_weather('Philadelphia','PA'); print $weather->report();
<font size=+4>Philadelphia, Pennsylvania</font><br> <img src="http://image.weather.com/weather/wx_icons/PFMScurrent/28.gif +" border=0> ... <tr><td><b>Sunrise</b></td><td>7:14 am</td> <tr><td><b>Sunset</b></td><td>5:16 pm</td> </table>
use Geo::Weather; ... my $current = $weather->get_weather('19067'); print "The current temperature is $current->{temp} degrees\n";
The current temperature is 35 degrees
www.com | www.net | www.org
No recent polls found