CPAN::Groonga

package Druid;


use Moo;
use JSON::MaybeXS qw(encode_json decode_json);
use LWP::UserAgent;
use HTTP::Request;
use Druid::Util qw(iso8601_yyyy_mm_dd_hh_mm_ss);

our $VERSION = '0.004';

has 'api_url'

P::Request->new( 'POST' => $self->api_url );
        $req->header( 'Content-Type' => 'application/json' );
        return $req;
    },
);

sub send {
    my $self = shift;
    my $query = shift;

    

f->req->content( encode_json( $request_hash ) );

    my $res = $self->ua->request( $self->req );
    if ($res->is_success) {
        eval {
            $response = decode_json($res->content) if $res-