Yet Another CPAN Grep

WWW-Shorten-Naver ( J/JE/JEEN/WWW-Shorten-Naver-0.03.tar.gz, JEEN, 2017; MetaCPAN )

WWW-Shorten-Naver/lib/WWW/Shorten/Naver.pm ( view source; MetaCPAN )

package WWW::Shorten::Naver;
use strict;
use warnings;
use Carp ();
use JSON::MaybeXS;
use URI ();
use Scalar::Util qw(blessed);
use parent qw( WWW::Shorten::generic Exporter );
our @EXPORT = qw(new V

ation/json}) {
        Carp::croak("Unexpected response: $content");
    }
    my $json = decode_json($content);
    Carp::croak("Invalid data returned: $content") unless $json;
    return $json->{res