謝り美人の画像をぶっこぬくスクリプト

謝り美人っていうサービスが開始されましたね。素晴らしいですね。
http://www.gomenne.jp/


で、ぶっこぬくスクリプト
てか、スクリプトにするまでもない感はあるんだけど、昔書いた美人時計からぶっこぬくスクリプト流用して書いた。
なんか微妙にとれてない子がいるので、ちょっと間違ってるのかも。

require 'net/http'
require 'uri'

error_files = ""
(1..31).each do |member_id|
   (1..4).each do |picture_id|
      mem_id_str = sprintf("%0#{2}d", member_id)
      url = "/img/website/#{mem_id_str}/photo_#{picture_id}.png"
      begin
         Net::HTTP.start("www.gomenne.jp", 80) do |http|
         response = http.get(url)
         open("#{mem_id_str}_#{picture_id}.png", "wb") do |file|
             file.puts response.body
         end
      end
      rescue 
         error_files += url + "\n"
      end
      sleep 2
   end
end


で、気にいった子は、
http://www.gomenne.jp/img/website/05/photo_3.png
http://www.gomenne.jp/img/website/08/photo_2.png
http://www.gomenne.jp/img/website/31/photo_1.png