Problem se zonovym transferem - modul Net::DNS

Honza Pazdziora adelton na informatics.muni.cz
Středa Duben 10 15:44:14 MEST 2002


On Wed, Apr 10, 2002 at 02:50:38PM +0200, Bárta Petr wrote:
> 	mame problem s modulem Net::DNS a zonovym transferem. Snazime se
> ziskat data analogicka vystupu napr. z utility "host", postupujeme AFAIK
> podle dokumentace, ale vystup neni takovy, jaky bychom cekali.
> 
> 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";
	}

?

-- 
------------------------------------------------------------------------
 Honza Pazdziora | adelton na fi.muni.cz | http://www.fi.muni.cz/~adelton/
      ... all of these signs saying sorry but we're closed ...
------------------------------------------------------------------------


Další informace o konferenci Perl