eval.lua

function string:eval(...) return load(self)(...) end
function string:between(from, to)
  local head, head_end = self:find(from, 0, true)
  local tail, tail_end = self:find(to, head_end, true)
  return self:sub(head_end, tail)
end
function string:lines(eol) return self:gmatch('[^'..eol or '\r\n'..']+') end
function string:itemize(pattern) return self:gmatch('[%.]*'.. pattern ..'[%.]*') end

local pastebin = {
  user_index = function (html)
    local user_index = {}

    for line in html:between('<table class="maintable">', '</table>'):lines() do
      for id, name in line:itemize('<a href="/(%w+)">(%g+)</a>') do

        user_index[id] = name
      end
    end

    return pairs(user_index)
  end
}

local vArgs = {...}
(vArgs[1] or "print('usage: <code> [params]')"):eval(table.unpack(vArgs,2))