[Perl] Enumerate DNS information on a domain