2ちゃんねるニュー速VIP板の全てのdatファイルを取って来てカレントディレクトリにぶちまけるお遊びRubyプログラム。全部取得するまでたぶん結構時間かかります。
〜〜〜〜〜〜〜〜〜〜
require 'net/http'
Net::HTTP.version_1_2
open("subject.txt", "w") do |subj|
Net::HTTP.start('wwwww.2ch.net', 80) {|http|
response = http.get('/news4vip/subject.txt')
subj.print response.body
}
end
open("subject.txt", "r") do |input|
while sure = input.gets
if sure =~ /(.*dat).*/
puts $1
suredat = "/news4vip/dat/"+$1
open($1, "w") do |src|
Net::HTTP.start('wwwww.2ch.net', 80) {|http|
response = http.get(suredat)
src.print response.body
}
end
end
end
end
〜〜〜〜〜〜〜〜〜〜
趣味グラムです。主な趣味は2ちゃんねるですが、何か?巷間ではキモいプログラムをキモグラムと呼ぶそうです。キモいプログラマはキモグラマです。
キモ試しでキモッ!と絶倫先生に逃げ出されるくらいまで精進します。
2007 02/23 23:16:27 | 2ちゃんねる | Comment(0)
Powerd by バンコム ブログ バニー

この記事へのコメント

この記事にコメントする

名前:
メールアドレス:
URL:
セキュリティコード  
※セキュリティコードとは不正アクセスを防ぐためのものです。
画像を読み取り、入力して下さい。

コメント:
タグ挿入

サイズ
タグ一覧
Smile挿入 Smile一覧