Yet Another CPAN Grep

WWW-XKCD-AsText ( K/KY/KYZN/WWW-XKCD-AsText-0.006.tar.gz, KYZN, 2017; MetaCPAN )

WWW-XKCD-AsText/lib/WWW/XKCD/AsText.pm ( view source; MetaCPAN )

WW::XKCD::AsText::VERSION = '0.006';
use namespace::autoclean;
use Moose;

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

has 'timeout' => (
  is  => 'ro',
  isa => 'Maybe[Int]',
  required => 1,

.com/$id/"));
  my $json_uri = URI->new("https://xkcd.com/$id/info.0.json");
  my $response = $self->ua->get($json_uri);

  if ($response->is_success){
    my $decoded = decode_json($response->content