::gTLD;
# ABSTRACT: an interface to the ICANN gTLD database.
use Carp;
use Data::Mirror qw(mirror_json);
use DateTime::Format::ISO8601;
use Net::DNS::Domain;
use Net::RDAP 0.34;
use Net::RDAP::Registr
ources/registries/gtlds/v2/gtlds.json};
use vars qw($VERSION);
use warnings;
use strict;
$VERSION = '0.02';
sub get_json {
my $package = shift;
return mirror_json(GTLD_LIST_URL) || croak(q{Unable
ift;
my $json = $package->get_json;
return map { $package->new($_) } @{$json->{gTLDs}};
}
sub get {
my ($package, $gTLD) = @_;
my $json = $package->get_json;
my @array = @{$json->{gTLDs}}