CPAN::Groonga

API;

use 5.006;
use strict;
use warnings FATAL => 'all';

our $VERSION = '0.013';

use Carp;
use JSON;
use LWP::UserAgent;
use URI::Escape;

use constant BASE_URL          => 'https://api.shodan.io';

 my $ua = LWP::UserAgent->new;
    my $json = JSON->new->allow_nonref;

    my $self = {
        APIKEY => $apikey,
        UA     => $ua,
        JSON   => $json,
    };
    bless $self, $class;
    

 $self;
}

sub _ua {
    my $self = shift;
    return $self->{UA};
}

sub _json {
    my $self =shift;
    return $self->{JSON};
}

sub _request {
    my ($self, $endpoint) = @_;
    my $response = $s