blob: 47ff27446a54780fb501381dc01e6d12f85070eb (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
net .alg .httpServer "+" via
{ 2002 } +port
{ ":" via
:url dump
[
{ :url "/" eq } {
"<html><body>Hallo Welt!<a href=\"/test\">Test</a></body></html>"
"text/html" :ok
} { :url "/test" eq } {
"<html><body>Test!</body></html>"
"text/html" :ok
}
] conds
} +request
+run
|
