謝り美人の画像をぶっこぬくスクリプト
謝り美人っていうサービスが開始されましたね。素晴らしいですね。
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