5 BROKEN_DATES = ['2011-05-16', '2011-05-17', '2011-05-18', '2011-05-19', '2011-05-20']
7 system("scp lintian.debian.org:~cjwatson/dhstats.txt .")
8 f = File::new("cdbs-dh7.txt", 'w')
9 f.puts "date dh dh7 cdbs"
10 IO::read("dhstats.txt").split(/\n\n/).each do |par|
12 next if par == "Sun Sep 20 00:29:01 UTC 2009"
13 lines = par.split(/\n/)
14 date = Date::parse(lines[0]).to_s
15 dh = lines.grep(/^debhelper: /)[0].split[2].gsub(/[\(\)\%]/,'').to_f
16 dh7 = lines.grep(/^dh\(1\): /)[0].split[2].gsub(/[\(\)\%]/,'').to_f
17 cdbs = lines.grep(/^CDBS: /)[0].split[2].gsub(/[\(\)\%]/,'').to_f
18 next if BROKEN_DATES.include?(date)
19 f.puts "#{date} #{dh - dh7 - cdbs} #{dh7} #{cdbs}"
22 system("rm dhstats.txt")