Look at the Tcl "socket" command.
Very basic file server in 8 lines: http://wiki.tcl.tk/23621
Simple HTTP server in a page of code: http://wiki.tcl.tk/4333
Look at the Tcl "socket" command.
Very basic file server in 8 lines: http://wiki.tcl.tk/23621
Simple HTTP server in a page of code: http://wiki.tcl.tk/4333