lua match pattern example.

lua_match_pattern.lua

local Receiver = {} do
   Receiver.__index = Receiver

   function Receiver.new(t)
      return setmetatable(t or {}, Receiver)
   end
   function Receiver:__newindex(k, v)
      assert(type(v) == "function")
      local curr = self
      for comp in k:gmatch "(%w+)" do
         local v = curr[comp]
         if not v then v = {}; rawset(curr, comp, v) end
         curr = v
      end
      curr.__call = v
   end
   function Receiver:__call(msg)
      local parent, key = self, nil
      for i, key in ipairs(msg) do
         key = tostring(key)
         local v = parent[key]
         if not v then return end
         if v.__call then v.__call(table.unpack(msg, i)) end
         parent = v
      end
   end
end

local receiver = Receiver.new()

function receiver:lua(...)
   print("lua", ...)
end
function receiver:lua_tcp(...)
   print("lua_tcp", ...)
end

function receiver:after_50000(...)
   print("after", ...)
end

receiver { "lua", "tcp", 1000 }
receiver { "after", 50000, "foo" }