Hi,

Well, first I would put in some debug print statements to find out where it is 'hanging'. My guess is that it is on the gethostby* functions which will block. You may want to take a look at using Net::DNS::Resolver instead because lookups can be performed in nonblocking mode.

In short, you give it a list of dns servers to query then make the query.