require 'watir'
$ie=Watir::IE.new
$ie.goto "http://www.baidu.com/"
a=[]
b=[]
i=0
$ie.table(:id,"l").links.each {|d| a<<d }
a.each do |x|
b=x.to_s.split(" ")
c=b.rindex("href:").to_i
if b[c+1]=~/.baidu.com/
i=i+1
end
end
puts i
require 'watir'
$ie=Watir::IE.new
$ie.goto "http://www.baidu.com/"
a=[]
b=[]
i=0
$ie.table(:id,"l").links.each {|d| a<<d }
a.each do |x|
b=x.to_s.split(" ")
c=b.rindex("href:").to_i
if b[c+1]=~/.baidu.com/
i=i+1
end
end
puts i