CPAN::Groonga

# ABSTRACT: provides perl API to VisualCrossing
package VisualCrossing::API;

use JSON;
use HTTP::Tiny;
use Moo;
use strictures 2;
use namespace::clean;

our $VERSION = '1.0.0';

my $DEBUG = 0;

my $a

 $response->{status} $response->{reason}\n"
        unless $response->{success};

    my $coder = JSON->new->utf8;
    my $result = $coder->decode($response->{content});
    return $result;
}

sub BUI

ub TO_JSON {return { %{shift()} };}

1;


=pod

=encoding utf-8

=head1 NAME

VisualCrossing::API - Provides Perl API to VisualCrossing

=head1 SYNOPSIS

    use VisualCrossing::API;
    use JSON::XS;