CPAN::Groonga

use 5.016;
use warnings;
use Carp qw(croak carp);
use Date::Parse;
use Extism;
use JSON::PP qw(decode_json encode_json);
use LWP::UserAgent;

sub __request {
    my ($self, $path, $opt) = @_;
    $opt

   $res->content
}

sub _json_request {
    my ($self, $path, $opt) = @_;
    $opt //= {};
    if (exists $opt->{body}) {
        $opt->{body} = eval {
            encode_json($opt->{body})
        };

 to json\n";
        }
        $opt->{headers}{'Content-Type'} //= 'application/json; charset=utf-8';
    }
    my $res = $self->__request($path, $opt);
    my $content = eval {
        decode_json($r