Yet Another CPAN Grep

App-rdapper ( G/GB/GBROWN/App-rdapper-1.20.tar.gz, GBROWN, 2025; MetaCPAN )

App-rdapper/lib/App/rdapper.pm ( view source; MetaCPAN )

;
use File::ShareDir qw(:ALL);
use Getopt::Long qw(GetOptionsFromArray :config pass_through);
use JSON;
use List::Util qw(any min max uniq);
use Net::ASN;
use Net::DNS::Domain;
use Net::IDN::PP;
use N

tate/Province'),
    &ADR_PC     => _('Postal Code'),
    &ADR_CC     => _('Country'),
);

my $json = JSON->new->utf8->canonical->pretty->convert_blessed;

my $rdap;

my $out = \*STDOUT;
my $err = \*S

           }
            }

        } else {
            if ($raw) {
                $out->print($json->encode($object));

            } elsif ($object->isa('Net::RDAP::SearchResult')) {