Yet Another CPAN Grep

WebService-Async-SmartyStreets ( D/DE/DERIV/WebService-Async-SmartyStreets-0.002.tar.gz, DERIV, 2023; MetaCPAN )

WebService-Async-SmartyStreets/lib/WebService/Async/SmartyStreets.pm ( view source; MetaCPAN )

o;
no indirect;

use URI;
use URI::QueryParam;

use Future::AsyncAwait;
use Net::Async::HTTP;
use JSON::MaybeUTF8 qw(:v1);
use Syntax::Keyword::Try;
use Scalar::Util qw(blessed);

use WebService::Asyn

if (blessed($payload) && $payload->can('content')) {
                if (my $resp = eval { decode_json_utf8($payload->content) }) {
                    my $errors = $resp->{errors} // [];

row a generic error
        die 'Unable to retrieve response.';
    };

    my $response = decode_json_utf8($res->decoded_content);

    return $response->[0];
}

=head2 configure

Configures the inst