If you don't want to reinvent the wheel, look at Net::DNS, and perhaps gethostbyname in very simple cases.