September Morn Update

2019-09-12 10:33:56 -07:00 · 2019-09-12 10:33:56 -07:00 · aac6731f2c
commit aac6731f2c
parent 4e2d22a71d
6856 changed files with 141342 additions and 21127 deletions
--- a/Task/Hello-world-Web-server/Mathematica/hello-world-web-server-1.math
+++ b/Task/Hello-world-Web-server/Mathematica/hello-world-web-server-1.math
@ -0,0 +1,8 @@
+listener =
+ SocketListen["127.0.0.1:8080",
+  Function[{assoc},
+   With[{client = assoc["SourceSocket"]},
+    WriteString[client,
+     "HTTP/1.0 200 OK\nContent-Length: 16\n\nGoodbye, World!\n"];
+    Close[client]]]]
+SystemOpen["http://127.0.0.1:8080"]
--- a/Task/Hello-world-Web-server/Mathematica/hello-world-web-server-2.math
+++ b/Task/Hello-world-Web-server/Mathematica/hello-world-web-server-2.math
@ -0,0 +1,2 @@
+DeleteObject[listener];
+Close[listener["Socket"]]