Паттерн

for word in data:gmatch("%[(%a+)%]") do
   print(word) 
end

s = "hello world from Lua Здравствуйте люди"
 
for w in string.gmatch(s, "%S+") do
    print( w )
end

s = "[data][crc][!@#$%^&*]"
 
for w in string.gmatch(s, "%[(.-)%]") do
    print( w )
end

local words = {}
test = "text and one more text"
words[1], words[2] = test:match("(%S+)(.+)")
print(words[1])
print(words[2])

local words = {}
test = "text and one more text"
words[1], words[2] = test:match("(%S+)%s+(.+)")
print(words[1])
print(words[2])

crc = crypto.crc32(str,string.len(str))

local function toBytes(res)
    b = {}
    b[1] = math.floor(res / 2^24)
    b[2] = math.floor((res % 2^24) / 2^16)
    b[3] = math.floor((res % 2^16) / 2^8)
    b[4] = res % 2^8
    for i=1,4 do
        if b[i]<0 then
            b[i] = 256 + b[i]
        end
        b[i] = string.char(b[i])
    end
    return b[1]..b[2]..b[3]..b[4]
end

string.pack(">I2", uint):byte(1, -1);

--create lookup table for octal to binary
oct2bin = {
  ['0'] = '000',
  ['1'] = '001',
  ['2'] = '010',
  ['3'] = '011',
  ['4'] = '100',
  ['5'] = '101',
  ['6'] = '110',
  ['7'] = '111'
}
 
local function oct_to_bin(a) return oct2bin[a] end
local function dec_to_bin(n)
  local s = string.format('%o', n)
  s = s:gsub('.', oct_to_bin)
  s = string.format("%032s", s)
  return s
end
 
local function bin_to_bytes(bin)
  local bytes = {}
  for i= 1, #bin, 8 do
    local byte = tonumber(string.sub(bin, i, i+7), 2)
    table.insert(bytes, byte)
  end
  return bytes
end
 
local function dec32_to_bytes(dec)
  local bin = dec_to_bin(611360292)
  local bytes = bin_to_bytes(bin)
  return bytes
end
 
local bytes = dec32_to_bytes(611360292)
print(table.concat(bytes, " "))