圆月山庄资源网 Design By www.vgjia.com
转贴一个简单的Web服务器:
httpd.erl
%% httpd.erl - MicroHttpd -module(httpd). -author("ninhenry@gmail.com"). -export([start/0,start/1,start/2,process/2]). -import(regexp,[split/2]). -define(defPort,8888). -define(docRoot,"public"). start() -> start("[ \r\n]"), FileName = DocRoot ++ Name, LogReq = Cmd ++ " " ++ Name ++ " " ++ Vers, Resp = case file:read_file(FileName) of {ok, Data} -> io:format("~p ~p ok~n",[LogReq,FileName]), Data; {error, Reason} -> io:format("~p ~p failed ~p~n",[LogReq,FileName,Reason]), error_response(LogReq,file:format_error(Reason)) end, do_send(Sock,Resp), gen_tcp:close(Sock). %% construct HTML for failure message error_response(LogReq,Reason) -> "<html><head><title>Request Failed</title></head><body>\n" ++ "<h1>Request Failed</h1>\n" ++ "Your request to " ++ LogReq ++ " failed due to: " ++ Reason ++ "\n</body></html>\n". %% send a line of text to the socket do_send(Sock,Msg) -> case gen_tcp:send(Sock, Msg) of ok -> ok; {error, Reason} -> exit(Reason) end. %% receive data from the socket do_recv(Sock) -> case gen_tcp:recv(Sock, 0) of {ok, Bin} -> binary_to_list(Bin); {error, closed} -> exit(closed); {error, Reason} -> exit(Reason) end
运行时在httpd.erl本地建一个public目录,public目录里放一个index.html文件
然后httpd:start()启动服务器,就可以访问http://localhost:8888/index.html了
标签:
Erlang,Web,服务器
圆月山庄资源网 Design By www.vgjia.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
圆月山庄资源网 Design By www.vgjia.com
暂无评论...
更新日志
2024年04月29日
2024年04月29日
- 借由《星露谷》事件,聊聊游戏汉化中的“信达雅”
- 黄凤凤.2011-丽风金典系列VOL.2【丽风】【WAV+CUE】
- 郑秀文.2021-ListenToMi(EP)【寰亚】【FLAC分轨】
- 傻子与白痴.2021-YearofFate【哇唧唧哇】【FLAC分轨】
- 玩家晒《剑星》配饰截图:眼镜爱好者大满足!
- 女子买珍珠是贝壳做的 商家回复:这是珍珠的妈妈!
- 《英雄联盟手游》亚索新皮肤明日上线 峡谷吹奏《兰亭序》
- 原画壁纸及美图第203期,无水印可自取
- 原画壁纸及美图第204期,无水印可自取
- 原画壁纸及美图第205期,无水印可自取
- 向蕙玲.2016-女人心事【豪记】【WAV+CUE】
- 徐若瑄.2024-先听我说完Its.My.Turn【SONY】【FLAC分轨】
- 林子祥.2016-最爱40周年MY.BELOVED.4CD【华纳】【WAV+CUE】
- 群星《古惑仔 电影原声大碟》香港首版4CD [WAV+CUE][893M]
- 无期迷途《完美投票 游戏原声OST》[320K/MP3][36.18MB]