write table to file

local p = peripheral.wrap("left")
local tbl = p.getAvailableItems()
local filename = "test"

local file = fs.open(filename, "w")
local nLnCnt = 1
function printTable(pTbl, nCnt)
    for k,v in pairs(pTbl) do
    if type(v) == "table" then
      file.writeLine(getSpacer(nCnt)..k)
      printTable(v, nCnt+1)
    else
      sv = tostring(v)
      file.writeLine(getSpacer(nCnt)..k.." - "..sv)
      nLnCnt = nLnCnt+1
    end
    if nLnCnt >= 15 or nCnt == 0 then
      nLnCnt = 1
    end
  end
end

function getSpacer(nCnt)
  local spr = ""
  local max = tonumber(nCnt)
  for n = 1,max do
    spr = spr.."  "
  end

  return spr
end

printTable(tbl,0)
file.close()