diff -r a74506d89903 -r 04685427a35b lib/DNS/Vi.pm --- a/lib/DNS/Vi.pm Thu Apr 09 22:07:08 2015 +0200 +++ b/lib/DNS/Vi.pm Thu Jul 14 10:30:27 2016 +0200 @@ -289,8 +289,11 @@ sub get_auth_info { my $name = shift; + my $server = shift; my %auth = (zone => undef, master => undef); - state $resolver = Net::DNS::Resolver->new; + state $resolver = Net::DNS::Resolver->new( + defined $server ? (nameservers => [$server]) : () + ); my $response = $resolver->send($name, 'SOA') or die $resolver->errorstring, "\n";