第一种方法:
$result='d:\\rs.txt'
File.open($result, "r") do |file|
file.each_line do |line|
if line.length>20
puts line.chop.length #去掉最后一个换行字符,并显示该行实际字符串的长度
puts line
end
end
end
第二种方法:
filename='d:\\rs.txt'
while File.exists?(filename) #如果源文件存在就执行下面的操作
file=File.open(filename,'r')
while (lines=file.gets)
puts lines
end
写文件:
$filename="C:\\Automation\\rss"+".txt"
$logfile = File.new($filename,"a")
iCount=0
while(iCount<10) //循环写入10行
$logfile.puts "http://xxxx/rs#{iCount}.xml"
iCount=iCount+1
end