net_adm:dns_hostname/1

获取 Host 主机的正式名字

用法：

dns_hostname(Host) -> {ok, Name} | {error, Host}

内部实现：

-spec dns_hostname(Host) -> {ok, Name} | {error, Host} when
      Host :: atom() | string(),
      Name :: string().

dns_hostname(Hostname) ->
    case inet:gethostbyname(Hostname) of
	{ok,{hostent, Name, _ , _Af, _Size, _Addr}} ->
	    {ok, Name};
	_ ->
	    {error, Hostname}
    end.

返回 Host 主机的正式名字，如果找不到这个主机名，则返回 {error, Host}。

net_adm:dns_hostname('127.0.0.1').