use Socket;

$site_name = 'www.oschina.net';

$address = inet_ntoa(inet_aton($site_name));

print "The DNS address of www.oschina.net is $address";