Temperature by ZipCode - Web Service Code needed

[mattfarley]

I need to get some code that will simply output the local temperature of a constant zip code using web services. The language can be either PerlScript or vbscript, or even Javascript. I already have one working, but it's not a production service (just a demo server), so it cannot be counted on for reliability. The code is:

<%@ LANGUAGE = PerlScript %>
<%
#!/usr/bin/perl
use SOAP::Lite;
my $temp = SOAP::Lite
-> service('

http://www.xmethods.net/sd/2001/TemperatureService.wsdl')

-> getTemp('95828') . &quot;f / &quot;;
print $temp;
%>

And my output is &quot;78.0f&quot; or whatever. Well xmethods.net's stability isn't too good. If anyone could show me some code that would accomplish the same thing in vbscript/perlscript/javascript using a different server, I'd be very grateful. Here are two web services available for getting temperature readings:

http://www.webservicex.net/WS/WSDetails.aspx?CATID=12&WSID=53

http://ocean.cse.ucsc.edu/soap/getCAWeather.html

I will have the temperature showing on the front page of my new site:

http://www.sac-yolomvcd.com/makeover

in the menu bar at the top.

Thanks for all help!
-Matt