Advertisement
Hppavilion1

WCalc HTTP Server

Feb 26th, 2016
75
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.28 KB | None | 0 0
  1. @(sock '' 80)(request).(
  2. stdout("request for ") ->
  3. stdout(request:path) ->
  4. stdout(" from ") ->
  5. stdout(request:ip) ->
  6. stdout(" on port ") ->
  7. stdout(request:port) ->
  8. 0
  9. |
  10. filesys[request:path] ->
  11. filesys(content) ->
  12. request:write(content)->
  13. 0
  14. );
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement