美人時計の画像ファイルが欲しい
美人時計という素晴らしいサービスがあります。
1分ごとに美人が表示される素晴らしいサイトですが、悲しい技術者の性。url 分かるんだったら画像取得できるじゃん。などと思ってしまうわけです。
追記の追記:
以下のスクリプトだと取得できなくなったから、新しいのつくりましたー。
http://d.hatena.ne.jp/Yamashiro0217/20090930/1254305886
追記:たしかに凶悪なので sleep を入れました。ごめんなさい><
require 'net/http' require 'uri' def get_file(download_url, filename) response = fetch(download_url,10) open(filename, "wb") do |file| file.puts response.body end return filename end def fetch( uri_str, limit = 10 ) raise ArgumentError, 'http redirect too deep' if limit == 0 response = Net::HTTP.get_response(URI.parse(uri_str)) case response when Net::HTTPSuccess then response when Net::HTTPRedirection then fetch(response['Location'], limit - 1) else response.error! end return response end error_files = "" 0..24.times { |hour| 0..60.times { |minute| now_hour = sprintf("%0#{2}d", hour) now_minute = sprintf("%0#{2}d", minute) sleep 1 begin get_file "http://www.bijint.com/jp/img/photo/#{now_hour}#{now_minute}.jpg", "#{now_hour}#{now_minute}.jpg" rescue Net::HTTPFatalError => e p e p "#{now_hour}#{now_minute}.jpg can not get" error_files += "http://www.bijint.com/jp/img/photo/#{now_hour}#{now_minute}.jpg\n" end } } print "errored" print error_files
ご利用は計画的に。
追記:俺も東條サンにかまって欲しいんだぜ。
でチェックしてしまいました。お気に入り。女の子の趣味がばれてしまいますね。