会员
周边
新闻
博问
融资
云市场
所有博客
当前博客
我的博客
我的园子
账号设置
简洁模式
...
退出登录
注册
登录
分享----适度设计
博客园
园子
首页
新随笔
联系
管理
订阅
lua抓取网络文件
curl = require("luacurl") --下载这个页面的.java文件 downloadurl = "http://www.cs.princeton.edu/~rs/talks/LLRB/Java/" function get_html(url, c) local result = { } if c == nil then c = curl.new() end c:setopt(curl.OPT_URL, url) c:setopt(curl.OPT_WRITEDATA, result) c:setopt(curl.OPT_WRITEFUNCTION, function(tab, buffer) --call back函数,必须有 table.insert(tab, buffer) --tab参数即为result,参考http://luacurl.luaforge.net/ return #buffer end) local ok = c:perform() return ok, table.concat(result) --此table非上一个table,作用域不同 end ok, html = get_html(downloadurl) if ok then --分析页面返回的.java的地址 for k in string.gfind(html, ">(%w+.java)<") do ok,javacode = get_html(downloadurl .. k) file = io.open("./"..k, "w"); if(file) then file:write(javacode); file:close(); end end else print ("Error" ) end
posted @
2011-08-08 16:08
好好学习,天天进步
阅读(
803
) 评论(
0
)
编辑
收藏
举报
会员力量,点亮园子希望
刷新页面
返回顶部
公告