I take it you looked up Net::Whois... what are those modules missing? Are you looking for something that will give you back all domain names? Or do you just mean you need recursive whois -- try Net::Whois::Raw.