Yet Another CPAN Grep

Museum-Rijksmuseum-Object ( R/RS/RSHEAT/Museum-Rijksmuseum-Object-0.03.tar.gz, RSHEAT, 2023; MetaCPAN )

Museum-Rijksmuseum-Object/lib/Museum/Rijksmuseum/Object.pm ( view source; MetaCPAN )

package Museum::Rijksmuseum::Object;

use strictures 2;

use Carp;
use JSON::MaybeXS;
use LWP::UserAgent;
use Moo;
use URI;
use URI::Encode qw( uri_encode );
use URI::QueryParam;

use namespace::clean

    my $res = $ua->request($req);
    if ( $res->is_success ) {
        my $json = JSON::MaybeXS->new();
        return $json->decode( $res->content );
    } else {
        return { error => $res->sta