You can't install Net::DNS with PPM / CPAN / something else, on Windows?

Otherwise you can convert something like this, but convert it to use Win32::OLE or DBD::ADO.