net::dns module

[Vasileios Delis]

Hi there

trying to understand the module I tried the following example (also in the module'es 
refrence):

use Net::DNS;

  $res = new Net::DNS::Resolver;
  $res->debug(1);
  $query = $res->search($ARGV[0]);
  
  if ($query) {
      foreach $rr ($query->answer) {
          next unless $rr->type eq "A";
          print $rr->address, "\n";
      }
  }
  else {
      print "query failed: ", $res->errorstring, "\n";
  }

but it doesnt seem to work ('query timed out'), nomatter if I'm asking for an internal 
or an external domain. I'm currentry on a NT workstation, using DHCP service. Does 
anybody know the reason for this and how can I come over it? I should write a program 
using this module and I must be able to test it on my workstation...

Thanks in advance!

vas.




-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]