2ch.net専用ブラウザの開発者の皆さまへ ★19

1 ：名無しさん＠お腹いっぱい。：2015/03/16(月) 18:11:20.08 ID:aidBFEg70.net

■前スレ
2ch.net専用ブラウザの開発者の皆さまへ ★18
http://anago.2ch.net/test/read.cgi/software/1426207192/


■関連スレ（2ch.net）
【難民対策】2ch.netからの移住先を検討するスレ ★2
http://carpenter.2ch.net/test/read.cgi/operatex/1425558409/
ちゃんねる専用ブラウザ開発者の皆さまへ…の新地
http://anago.2ch.net/test/read.cgi/software/1424191747/

Let's talk with Yamashita-san.
http://anago.2ch.net/test/read.cgi/software/1424083075/


■関連スレ（外部）
2ch.net専用ブラウザの開発者の皆さまへ★8 [SC]
http://anago.2ch .sc/test/read.cgi/software/1424461924/
2ch.net専用ブラウザの開発者の皆さまへ ★避難所
http://anago.open 2ch.net/test/read.cgi/software/1425521326/
【難民対策】2ch.netからの移住先を検討するスレ ★3
http://open.open 2ch.net/test/read.cgi/open2ch/1426166886/


■関連リンク
2ch API導入についての簡易まとめ
http://bbs.lames.jp/2ch-api.html
.net .sc open 投稿数比較
http://kenmo.biz/hikaku/
http://kenmo.biz/hikaku/all.php

401 ：名無しさん＠お腹いっぱい。：2015/03/17(火) 23:01:01.96 ID:VgrG2FXk0

ここの数字で集計するのが楽なんだろうか？

からす
http://stats.2ch.net/karasu.cgi?yes
すずめ
http://stats.2ch.net/suzume.cgi?yes

402 ：名無しさん＠お腹いっぱい。：2015/03/17(火) 22:49:08.89 ID:cC2OjazH0.net

>>397
HANA規制とか忍法帳とか、随分懐かしい話しだなぁ┐(´д｀)┌ﾔﾚﾔﾚ

403 ：名無しさん＠お腹いっぱい。：2015/03/17(火) 23:12:15.79 ID:lemBYHtaJ

>>401 suzumeからCSV(板名からのURL抽出つき)に変換するのをちょろっと書いた。
面倒だからここに貼る。

#!/usr/bin/perl
#
# usage example: wget -O- http://stats.2ch.net/suzume.cgi | perl $0 > foo.csv

my $SEP = ","; # or "\t" for TSV format.

while (<>) {
chomp; s|^<tr>|| or next; s|</tr>$|| or next;
my @col = grep(s/^<td[^>]*>//, split(/<\/td>/));
foreach (@col) {
s|<font[^>]*>(.+)</font>|$1|;
s|<b>(.+)</b>|$1|;
s| ||g;
}
# remove comma from numbers.
foreach (2,3,4,6) { $col[$_] =~ s/,//g; }
# extract URL from board name.
$col[1] =~ s|^<a href="(.+)">(.+)</a>|$2|;
splice(@col, 2, 0, $1);
print join($SEP, @col), "\n";
}
exit 0;

404 ：403：2015/03/17(火) 23:15:42.71 ID:lemBYHtaJ

>>403を走らせて現時点でのsuzumeから抽出したのが以下のような感じ。
あとはcol[2]が not /bbspink\.com/ なものだけ拾って、col[3]の合計をとればいいと思う。

順位,板名,,-本日の投稿数-,構成比(ppm),構成比累計,server,Graph
1,livejupiter,http://orpheus.2ch.net/livejupiter/,194913,99854,99854,orpheus,201325
2,news4vip,http://viper.2ch.net/news4vip/,178896,91648,191502,viper,184781
3,morningcoffee,http://hello.2ch.net/morningcoffee/,69438,35573,227075,hello,71722
4,newsplus,http://daily.2ch.net/newsplus/,67913,34792,261867,daily,70147
5,poverty,http://fox.2ch.net/poverty/,59422,30442,292309,fox,61376
6,ghard,http://wktk.2ch.net/ghard/,45147,23129,315438,wktk,46632
7,mnewsplus,http://hayabusa3.2ch.net/mnewsplus/,43059,22059,337497,hayabusa3,44475
8,livenhk,http://nhk.2ch.net/livenhk/,39939,20461,357958,nhk,41252
9,applism,http://anago.2ch.net/applism/,39519,20246,378204,anago,40819
10,livecx,http://hayabusa2.2ch.net/livecx/,38629,19790,397994,hayabusa2,39899

405 ：403：2015/03/17(火) 23:21:58.80 ID:lemBYHtaJ

でもって、上のような合計をするもの (これまた超適当)

===cuthere===
#!/usr/bin/perl
# usage example: cat foo.csv | perl $0
my $sum_2ch_net = 0;
my $sum_bbspink_com = 0;
while (<>) {
chomp;
my ($rank, $board, $url, $posts, $ratio, $ratiosum, $server, $graph) = split(/,/);
if ($url =~ /\.bbspink\.com\//) {
$sum_bbspink_com += $posts;
} else {
$sum_2ch_net += $posts;
}
}

print "2ch.net: $sum_2ch_net\n";
print "bbspink.com: $sum_bbspink_com\n";
exit 0;
===cuthere===

これをさっきとったものに適用した結果:

2ch.net: 1907821
bbspink.com: 44161

406 ：名無しさん＠お腹いっぱい。：2015/03/17(火) 23:22:25.36 ID:AVuQV5n+X

まあ、どんな寄生虫でも栄養源を(ほぼ)宿主に依存してることに変わりはないよね･･･

407 ：名無しさん＠お腹いっぱい。：2015/03/17(火) 23:23:45.35 ID:lemBYHtaJ

結局、pinkなんてざっと2%程度ってことか
実験終了
スレ汚しすまぬ

408 ：名無しさん＠お腹いっぱい。：2015/03/17(火) 23:23:46.73 ID:YM6e/1hR9

>>405
わかってはいたけどpink少ないなあ

>>406
てか元々は今の宿主が寄生虫だったわけで

409 ：名無しさん＠お腹いっぱい。：2015/03/17(火) 23:25:07.98 ID:TB0/D7nQ6

ほえーunixにはwgetなんつう便利そうなコマンドがあるのか

ああ例文中の$0って自ファイル名か

410 ：名無しさん＠お腹いっぱい。：2015/03/17(火) 23:26:06.69 ID:lemBYHtaJ

>>409
fetchでもftpでもなんでもどうぞ
つかこういうちょろっと遊びはcygwinでも入れてくれろ

あと$0の説明しなくてすまん。適当なんですが、そういうことっす。