ge JSON::GRDDL;
use Carp;
use JSON;
use JSON::T;
use LWP::UserAgent;
use Object::AUTHORITY;
use RDF::Trine;
use Scalar::Util qw[blessed];
BEGIN {
$JSON::GRDDL::AUTHORITY = 'cpan:TOBYINK';
$JSON::G
ta
{
my ($self, $document, $uri, %options) = @_;
unless (ref $document)
{
$document = from_json("$document");
}
$options{'model'} ||= RDF::Trine::Model->temporary_model;
my $T = $self->d
RDF/JSON.
$options{'model'}->add_hashref($document);
return $options{'model'};
}
elsif (ref $document eq 'HASH'
and $document->{'$schema'}->{'$ref'} eq 'http://soapjr.org/schemas/RDF_JSON')