Lua - 将表格转换成逗号分隔列表

Question

我需要将表格转换为逗号分隔列表以便将其保存到文本文件。 Lua中有这样的内置方法吗？

Answer 1

没有内置函数，但在网上有例子。

This is a decent one actually.

Answer 2

有没有内置的方式，但有一些相对简单的选项，如果你想自己构建它。这里有一些链接，可以帮助你找出你要如何把它一起：

http://www.lua.org/pil/12.1.html
http://lua-users.org/wiki/TableSerialization

Answer 3

没有，没有一个“内置”功能这一点。但是自己做并不难。我保留一个脚本，以递归方式将Lua表作为Lua脚本直接写入文件，然后可以像Lua脚本一样加载和执行Lua脚本。

--This file exports a function, WriteTable, that writes a given table out to a given file handle. 

local writeKey = {}; 

function writeKey.string(hFile, value, iRecursion) 
    WriteFormatted(hFile, "[\"%s\"]", value); 
end 

function writeKey.number(hFile, value, iRecursion) 
    WriteFormatted(hFile, "[%i]", value); 
end 

local writeValue = {}; 

function writeValue.string(hFile, value, iRecursion) 
    WriteFormatted(hFile, "[==[%s]==]", value); 
end 

function writeValue.number(hFile, value, iRecursion) 
    WriteFormatted(hFile, "%i", value); 
end 

function writeValue.boolean(hFile, value, iRecursion) 
    if(value) then hFile:write("true"); else hFile:write("false"); end; 
end 

function writeValue.table(hFile, value, iRecursion) 
    WriteTable(hFile, value, iRecursion) 
end 

local function WriteFormatted(hFile, strFormat, ...) 
    hFile:write(string.format(strFormat, ...)); 
end 

local function WriteForm(hFile, strFormat, ...) 
    hFile:write(string.format(strFormat, ...)); 
end 

local function WriteTabs(hFile, iRecursion) 
    for iCount = 1, iRecursion, 1 do 
     hFile:write("\t"); 
    end 
end 

function WriteTable(hFile, outTable, iRecursion) 
    if(iRecursion == nil) then iRecursion = 1; end 

    hFile:write("{\n"); 

    local bHasArray = false; 
    local arraySize = 0; 

    if(#outTable > 0) then bHasArray = true; arraySize = #outTable; end; 

    for key, value in pairs(outTable) do 
     if(writeKey[type(key)] == nil) then print("Malformed table key."); return; end 
     if(writeValue[type(value)] == nil) then 
      print(string.format("Bad value in table: key: '%s' value type '%s'.", key, type(value))); 
      return; 
     end 

     --If the key is not an array index, process it. 
     if((not bHasArray) or 
       (type(key) ~= "number") or 
       not((1 <= key) and (key <= arraySize))) then 
      WriteTabs(hFile, iRecursion); 
      writeKey[type(key)](hFile, key, iRecursion + 1); 
      hFile:write(" = "); 
      writeValue[type(value)](hFile, value, iRecursion + 1); 

      hFile:write(",\n"); 
     end 
    end 

    if(bHasArray) then 
     for i, value in ipairs(outTable) do 
      WriteTabs(hFile, iRecursion); 
      writeValue[type(value)](hFile, value, iRecursion + 1); 
      hFile:write(",\n"); 
     end 
    end 

    WriteTabs(hFile, iRecursion - 1); 
    hFile:write("}"); 
end 

Answer 4

如果您的表是一个数组，你可以使用table.concat打印的CSV：

t={10,20,30} 
print(table.concat(t,",")) 

输出10,20,30。