local function sendHeader(connection)
connection:send("HTTP/1.0 200 OK\r\nContent-Type: text/html\r\Cache-Control: private, no-store\r\n\r\n")
end
local function sendFileList(connection)
connection:send("\n")
local l = file.list()
for name, size in pairs(l) do
connection:send(" - " .. name .. " (" .. size .. ")
\n")
end
connection:send("
\n")
end
return function (connection, args)
sendHeader(connection)
connection:send('A Lua script sample')
connection:send('')
connection:send('File Listing
')
sendFileList(connection)
connection:send('')
end