enable caching

b092e3ee · Gavin Brown · 55712d66 · b092e3ee
Unverified Commit b092e3ee authored Aug 13, 2018 by Gavin Brown
Hide whitespace changes
Inline Side-by-side

Showing with 4 additions and 2 deletions

rdap-conformance rdap-conformance +4 -2

No files found.
--- a/rdap-conformance
+++ b/rdap-conformance
@@ -36,8 +36,10 @@ $opt->{'type'}   ||= ('help' eq $opt->{'handle'} ? 'help' : ($url->path_segments

 printf(STDERR "Testing %s, type '%s'...\n", $ARGV[0], $opt->{'type'});

-my $rdap = Net::RDAP->new;
-$ENV{'NET_RDAP_UA_DEBUG'} = $opt->{'debug'};
+my $rdap = Net::RDAP->new(
+	'use_cache' => 1,
+	'debug' => $opt->{'debug'}
+);
 $rdap->ua->proxy([qw(http https)], $opt->{'proxy'}) if ($opt->{'proxy'});

 my $resolver = Net::DNS::Resolver->new;