#scanweb.rb #用法ruby scanweb.rb www.1sucai.cn　将当前结果保存在c:\1.txt require 'net/http' filename= File.new('c:\1.txt',"w+") if $*[0]==nil  puts "hehe,没有输入网址" else h = Net::HTTP.new($*[0], 80) resp, data = h.get('/index.html', nil) if resp.message == "OK" data.scan(/<a href="(.*?)"/).each do |x| puts x filename.puts x end end end #无聊，有vbs、php、ruby版了，好像ruby比vbs快，与php不相上下。 =begin 修改一下 require 'net/http' filename= File.new('1.txt',"w+") if $*[0]==nil  abort "用法示例：ruby #$0 www.sohu.com　，结果放在当前目录1.txt"  end h = Net::HTTP.new($*[0], 80) resp, data = h.get('/index.html', nil) if resp.message == "OK" data.scan(/<a href="(.*?)"/).each do |x| puts x filename.puts x end end =end