Pasted

 Assoc retVal = GetMyHostname()
if (retVal.ok)
	echo(retVal.hostname)
else
	echo(retVal.errMsg)
end
  function Assoc GetMyHostname()
 	Assoc retVal
	retVal.ok = false
	retVal.errMsg = Undefined
	retVal.hostname = Undefined
 	Error err
	Dynamic inetAddrHostname
	Dynamic inetAddr = JavaObject.InvokeStaticMethod("java.net.InetAddress","getLocalHost",{})
	if (!IsError(inetAddr))
		inetAddrHostname = inetAddr.InvokeMethod("getHostName",{})
		if (!IsError(inetAddrHostname))
			retVal.hostname = inetAddrHostname
			retVal.ok = true
		else
			retVal.errMsg = Error.ErrorToString(inetAddrHostname)
		end
	else
		retVal.errMsg = Error.ErrorToString(inetAddr)
	end
 	return retVal
end