::Request;
$WebService::ForecastIO::Request::VERSION = '0.02';
use Moo::Role;
use HTTP::Tiny;
use JSON;
# ABSTRACT: Request role for WebService::ForecaseIO
has 'base_url' => (
is => 'ro',
d
);
},
lazy => 1,
);
has 'decoder' => (
is => 'ro',
default => sub {
JSON->new();
},
lazy => 1,
);
sub request {
my $self = shift;
my $url = $self->base_
er agent for the role. Uses L<HTTP::Tiny>.
=head2 decoder
The library to deserialize JSON responses. Uses L<JSON>.
=head1 AUTHOR
Mark Allen <mrallen1@yahoo.com>
=head1 COPYRIGHT AND LICENSE
This