Yet Another CPAN Grep

AI-CleverbotIO ( P/PO/POLETTIX/AI-CleverbotIO-0.002.tar.gz, POLETTIX, 2017; MetaCPAN )

AI-CleverbotIO/lib/AI/CleverbotIO.pod ( view source; MetaCPAN )

ome_text);

Send a I<ask> API request. The returned C<$answer> is a hash reference
derived by the JSON decoding of the response body, e.g.:

   {
      status   => 'success',
      response => 'Hullo'

_nick);

Send a I<create> API request. The returned C<$answer> is a hash reference
derived by the JSON decoding of the response body, e.g.:

   {
      status => 'success',
      nick   => 'NickTheRob

AI-CleverbotIO ( P/PO/POLETTIX/AI-CleverbotIO-0.002.tar.gz, POLETTIX, 2017; MetaCPAN )

AI-CleverbotIO/lib/AI/CleverbotIO.pm ( view source; MetaCPAN )


{ our $VERSION = '0.002'; }

use Moo;
use Ouch;
use Log::Any ();
use Data::Dumper;
use JSON::PP qw< decode_json >;

has endpoints => (
   is      => 'ro',
   default => sub {
      return {

0, "response status $response->{status}, nothing from $url)";
   }
   my $decoded = eval { decode_json($encoded) }
     or ouch 500, "response status $response->{status}, exception: $@";
   return $de