【協力願】Boo2008(旧Boo80)で串を食べませんか？ その５

[1 動け動けウゴウゴ２ちゃんねる 2008/06/07(土) 00:58:25 ID:VGnJS/iF0]

Boo2008(旧名Boo80)というスクリプトで串を規制するプロジェクトです。

●過去スレ
【協力願】Boo80で串を食べませんか？
　http://qb3.2ch.net/test/read.cgi/operate/1064576191/
【協力願】Boo80で串を食べませんか？　その２
　http://qb5.2ch.net/test/read.cgi/operate/1081858336/
【協力願】Boo80で串を食べませんか？　その３
　http://qb5.2ch.net/test/read.cgi/operate/1104339319/
【協力願】Boo2008(旧Boo80)で串を食べませんか？　その４
http://qb5.2ch.net/test/read.cgi/operate/1199345454/1

●Boo2008スクリプト
オリジナルバージョン
　http://boo.2ch.net/

●おまけ（旧アドレス／新式は現時点では未発表。完成次第告知します）
鯖別串迎撃ランキング
　http://qb6.2ch.net/_boo80/pokan.cgi
迎撃速報hack72 最近のお宝(2004-10-21)
　http://hack72.2ch.net/otakara.cgi

●関連リンク
　http://info.2ch.net/wiki/index.php?Boo80 (２ちゃんねるWiki/boo80)
　http://info.2ch.net/wiki/index.php?Boo2008 (２ちゃんねるWiki/boo2008)
■　新企画 Hack72 (BBQ に貯まっている串の速報)　part1
　http://qb5.2ch.net/operate/kako/1093/10939/1093978218.html DAT墜ち
【BBQ＆BBM31本目】公開串登録所【ピンポイント規制】
http://qb5.2ch.net/test/read.cgi/sec2chd/1210411860/1
□規制解除要望□ 焼かれたひと専用 [BBQ]★12
http://life9.2ch.net/test/read.cgi/goki/1212512700/1

[173 ◆TWARamEjuA 2008/07/05(土) 15:32:10 ID:wRObEW0k0]

こんなことしてみますた。
-rw-r--r-- 1 ch2boo ch2 16384 Jul 4 23:30 DB_yeah.db
-rw-r--r-- 1 ch2boo ch2 27254784 Jul 4 19:21 DB_yeah.db.old

暫し様子見。み。み。

[174 ◆TWARamEjuA 2008/07/05(土) 15:35:45 ID:wRObEW0k0]

でもよく考えてみると、、、
引っかかったもの→Boo登録＋BBQ登録
なので、Yeahが必要なのか？ってところ。
Yeahチェック前にBBQチェックが入っていることだし。。。

#
# 既出チェック
#
sub Check_Gaisyutu{
my $dest_ADDR = shift;
my $status;

my $BBQ_status = Check_BBQ($dest_ADDR) ? '[BBQ]Roasted(-_-)': '[BBQ]None(^-^)';

# Yeah ちぇっく
$Yeah_DB = tie %boo2008_yeah,
"DB_File",
$boo2008_YeahDB,
O_RDWR|O_CREAT,
0666,
$DB_Type;
$status = $boo2008_yeah{$dest_ADDR};
undef $Yeah_DB;
untie %boo2008_yeah;

return ('91', $BBQ_status) if defined $status;
:
:
: