/usr/share/doc/gawk/examples/network
NameSizeModeActions
coreserv.awk33910644editdlrm
eliza.awk102200644editdlrm
fingerclient.awk1610644editdlrm
geturl.awk7870644editdlrm
hello-serv.awk4630644editdlrm
maze.awk26550644editdlrm
mobag.awk28410644editdlrm
panic.awk5750644editdlrm
PostAgent.sh2740644editdlrm
protbase.awk4000644editdlrm
protbase.request1620644editdlrm
protbase.result6420644editdlrm
remconf.awk21860644editdlrm
statist.awk36120644editdlrm
stoxdata.txt1650644editdlrm
stoxpred.awk56370644editdlrm
testserv.awk3340644editdlrm
urlchk.awk10530644editdlrm
webgrab.awk1870644editdlrm
Edit: /usr/share/doc/gawk/examples/network/hello-serv.awk (463B)
BEGIN { RS = ORS = "\r\n" HttpService = "/inet/tcp/8080/0/0" Hello = "" \ "A Famous Greeting" \ "

Hello, world

" Len = length(Hello) + length(ORS) print "HTTP/1.0 200 OK" |& HttpService print "Content-Length: " Len ORS |& HttpService print Hello |& HttpService while ((HttpService |& getline) > 0) continue; close(HttpService) }