use Socket;
print gethostbyaddr( $ipaddr, AF_INET );