CPAN::Groonga

            undef, [qw(info render)]],
        ['e621-post-identifier' => 'https://e621.net/posts.json?limit=1&tags=id:%u',   undef, [qw(metadata)]],
        ['e621-pool-identifier' => 'https://e621.n

            undef, [qw(info render)]],
        ['e621-pool-identifier' => 'https://e621.net/pools.json?search[id]=%u',        undef, [qw(metadata)]],
    ],
    'dnb' => [
        ['gnd-identifier' =>

/%s/',              undef, [qw(info render)]],
        ['xkcd-num' => 'https://xkcd.com/%s/info.0.json',   undef, [qw(metadata)]],
    ],
    'viaf' => [
        ['viaf-identifier' => 'https://viaf.or

iers from URIs

package Data::URIID::Future;

use strict;
use warnings;
use v5.10;

use Carp;
use JSON;
use Encode;
use URI;

use parent 'Future';

our $VERSION = v0.05;




sub _get_uri {
    my ($se

    return $uri if eval {$uri->isa('URI')};
    return $self->_get_uri($self->$uri());
}

sub get_json {
    my ($pkg, %opts) = @_;
    my $ua = $opts{extractor}->_ua;
    my @predepends = @{$opts{pre

application/json');
                return undef unless $msg->is_success;
                my $val = $msg->decoded_content(ref => 1, charset => 'none');
                $self->done(from_json(decode($ms

ers from URIs

package Data::URIID::Service;

use v5.10;
use strict;
use warnings;

use Carp;
use JSON;
use URI;
use URI::Escape;
use Encode;
use Scalar::Util qw(weaken);
use List::Util qw(all);
use D

wikidata.org/sparql',
        entitydata  => 'https://www.wikidata.org/wiki/Special:EntityData/%s.json?flavor=dump',
    },
    prefix => 'http://www.wikidata.org/entity/',
    uuid_relations => \@mus

tgrid.de/sparql',
        entitydata  => 'https://database.factgrid.de/wiki/Special:EntityData/%s.json?flavor=dump',
    },
    prefix => 'https://database.factgrid.de/entity/',
    attributes => [