Manipulacja ciągami w Lua: Utwórz nieparzystą wielką literę

Question

Próbuję zrobić bibliotekę w Lua z jakąś funkcją, która manipuluje ciągami. Chcę wykonać funkcję, która zmienia wielkość liter na wielkie tylko na dziwne znaki tego słowa.

To jest przykład:

Input: This LIBRARY should work with any string! 
Result: ThIs LiBrArY ShOuLd WoRk WiTh AnY StRiNg! 

Próbowałem z funkcją „gsub”, ale okazało się to naprawdę trudne do wykorzystania.

Answer 1

pierwsze, podzielić ciąg na tablicę słów:

local original = "This LIBRARY should work with any string!" 

local words = {} 
for v in original:gmatch("%w+") do 
    words[#words + 1] = v 
end 

Następnie utworzyć funkcję, aby włączyć słowa jak oczekiwano, dziwnych znaków na wielkie, a nawet znaków dolna:

function changeCase(str) 
    local u = "" 
    for i = 1, #str do 
     if i % 2 == 1 then 
      u = u .. string.upper(str:sub(i, i)) 
     else 
      u = u .. string.lower(str:sub(i, i)) 
     end 
    end 
    return u 
end 

Używanie funkcji do modyfikowania każdego słowa:

for i,v in ipairs(words) do 
    words[i] = changeCase(v) 
end 

Wreszcie, przy użyciu table.concat do c oncatenate na jednej strunie:

local result = table.concat(words, " ") 
print(result) 
-- Output: ThIs LiBrArY ShOuLd WoRk WiTh AnY StRiNg 

Answer 2

Ponieważ jestem kodowania głównie w Haskell ostatnio, rozwiązanie funkcjonalno-owski przychodzi do głowy:

local function head(str) return str[1] end 
local function tail(str) return substr(str, 2) end 

local function helper(str, c) 
    if #str == 0 then 
     return "" 
    end 

    if c % 2 == 1 then 
     return toupper(head(str)) .. helper(tail(str),c+1) 
    else 
     return head(str) .. helper(tail(str), c+1) 
    end 
end 

function foo(str) 
    return helper(str, 1) 
end 

Zastrzeżone: nie testowano, tylko pokazano ideę.

---

A teraz na poważnie można traktować ciąg jak listy znaków ze swobodnym dostępem z semantyki referencyjnych []. Prosta pętla z indeksem powinna wystarczyć.

Answer 3

To prawie działa:

original = "This LIBRARY should work with any string!" 
print(original:gsub("(.)(.)",function (x,y) return x:upper()..y end)) 

To zawodzi, gdy łańcuch ma długość nieparzystą, a ostatni znak jest literą, tak jak w

original = "This LIBRARY should work with any strings" 

I” Zostawię tę sprawę jako ćwiczenie.