$res = new Net:DNS::Resolver;