Problem se zonovym transferem - modul Net::DNS

[Bárta Petr]

> > Prislusna cast kodu je nasledujici:
> > 
> >   my $domain="ctt.cz";
> > #  my $domain="anet.cz";
> > 
> >   my $ress=new Net::DNS::Resolver;
> >   $ress->nameservers("212.65.193.6");
> >   my @zone = $ress->axfr($domain);
> >   foreach my $r (@zone) {
> >     $r->print;
> >   }
> 
> Co se stane, kdyz tam pridane
> 
> 	unless (@zone) {
> 		print "Failed: ", $res->errorstring, "\n";
> 	}

V tom pripade vypada vystup (pro domenu nastavenou na ctt.cz) nasledovne:

Failed: NXDOMAIN
Failed: NOERROR
Failed: NOERROR
Failed: NOERROR
Failed: NOERROR
Failed: NOERROR
Failed: NOERROR
Failed: NOERROR
Failed: NOERROR
Failed: NOERROR

-- 
Petr "Orin" Barta
Unix Administrator

Contactel, s.r.o. 
Vinohradská 174, 130 19 Praha 3 
E-mail: Petr.Barta na contactel.cz