test.lua

local shell = require("shell")
local s = require("serialization").serialize
local a,o = shell.parse(...)
local t = "val"
local tt = {"table"}

local f = io.open("/dev/socket","w")
f:write("_ENV====================================\n")
for k,val in pairs(_ENV) do
  local v="yolo"
  f:write(string.format("%s\t%q\n",k,type(val)))
end
f:write("_G======================================\n")
for k,val in pairs(_G) do
  local v="yole"
  f:write(string.format("%s\t%q\n",k,type(val)))
end
f:write("debug.getinfo()=========================\n")
local l=0
while(debug.getinfo(l)) do
  local info = debug.getinfo(l)
  f:write(string.format("%d :\n",l))
  for key,val in pairs(info) do
    f:write(string.format("\t%s\t%q\n",key,tostring(val)))
  end
  l=l+1
end
f:write("debug.getlocal()========================\n")
local i=1
while(debug.getlocal(2,i)) do
  f:write(string.format("%d\t%q\n",i,s(table.pack(debug.getlocal(2,i)))))
  i=i+1
end
f:close()