#!/usr/bin/perl

use Data::Dumper;
use Weather::Simple;

# define parameters for weather search
my %params = (
        'cache'      => '/tmp/weathercache',
        'partner_id' => 'somepartnerid',
        'license'    => '12345678',
        'place'      => 'Tupper Lake, NY',
);

# instantiate a new weather.com object
my $simple_weather = Weather::Simple->new(%params);

my $weather = $simple_weather->get_weather();

print Dumper($weather);