#!/usr/bin/perl -w use strict; use Geo::WeatherNWS; my $Report=Geo::WeatherNWS::new(); $Report->setservername("weather.noaa.gov"); $Report->setusername("anonymous"); $Report->setpassword('anemailuser@adomain.com'); $Report->setdirectory("/data/observations/metar/stations"); $Report->getreport('kmrj'); print $report;