package.path = package.path..';./libs/lua/?.lua'
package.cpath = package.cpath..';./libs/socket/?.dll;./libs/mime/?.dll'

./libs/lua/socket.lua:13: module 'socket.core' not found:
   no field package.preload['socket.core']
   no file 'C:\Quik_Alor\lua\socket\core.lua'
   no file 'C:\Quik_Alor\lua\socket\core\init.lua'
   no file 'C:\Quik_Alor\socket\core.lua'
   no file 'C:\Quik_Alor\socket\core\init.lua'
   no file 'C:\Quik_Alor\. .\share\lua\5.3\socket\core.lua'
   no file 'C:\Quik_Alor\. .\share\lua\5.3\socket\core\init.lua'
   no file '.\socket\core.lua'
   no file '.\socket\core\init.lua'
   no file './libs/lua/socket\core.lua'
   no file 'C:\Quik_Alor\socket\core.dll'
   no file 'C:\Quik_Alor\. .\lib\lua\5.3\socket\core.dll'
   no file 'C:\Quik_Alor\loadall.dll'
   no file '.\socket\core.dll'
   no file './libs/socket/socket\core.dll'
   no file './libs/mime/socket\core.dll'
   no file 'C:\Quik_Alor\socket.dll'
   no file 'C:\Quik_Alor\. .\lib\lua\5.3\socket.dll'
   no file 'C:\Quik_Alor\loadall.dll'
   no file '.\socket.dll'
   no file './lib

require "socket"
http = require 'socket.http'
local address = 'http://smart-lab.ru/dividends/index/order_by_t2_date/desc/'
local ts={"tr","strong","span"}
local lMax=91 --число строк в таблице
--------------------
function nkdelspace(s)
   local len=string.len(s); local z=""; local x1=32;
   for i=1,len do local x=string.byte(s,i); if x<32 then x=32 end
      if (x~=32 or x1~=32) then
         if z=="" then z=string.char(x) else z=z..string.char(x) end
         x1=x; end
   end    --убираем проблелы
return z;
end
----------------------
local body = http.request(address)
----------------------
for i=1,#ts do
   body = string.gsub (body,"(<%s*"..ts[i].."[^>]*>)","")
   body = string.gsub (body,"(<%s*/"..ts[i].."[^>]*>)","")
end
body = string.gsub (body," "," ")
local t={}  -- результат
local j=0; local k=0; local text=0;
local m=1; 
local n=string.find(body,"td>",m,#body,true);
local x=string.byte(body,n-1); 
m=m+3;
-----------------
 while #body>m do
    n=string.find(body, "td>",m,#body,true);
   if n then  local n1=n;
      if x~=47 then
         x=string.byte(body,n-1); if x==47 then n=n-1; end
         text = string.sub(body, m,n-2); text = nkdelspace(text);
         local len=string.len(text);
         if len<20 then
            j=j+1; if j==1 then k=k+1; t[k]={} end
            local tt=t[k]; tt[#tt+1]=text;
            if j==8 then     if k==lMax then break end
            j=0 end
         end
      else
         x=string.byte(body,n-1);
      end
   m=n1+3;
   else break;
   end
end

require "socket"

http = require 'socket.http'
html = http.request 'http://smart-lab.ru/dividends/'

print(html)