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