■ もちつけ2.0
レス数が1000を超えています。これ以上書き込みはできません。
固有番号等をキーにして「もちつけ規制2.0」を作る会。
前スレ
どっかいってしまった。
携帯からの連投あらしが減ればいいなぁ(BBM2.0なのだ) カッコを間違えた。
こう
$pm{'a'} = "1";
$pm{'b'} = "2";
$pm{'c'} = "3"; my $host = "http://bbm2.2ch.net/xxxx/x.so?" ;
my $path = "srv=$ENV{'SERVER_NAME'}" ;
$path .= "&tane=$GB->{IDNOTANE}" ;
$path .= "&ua=$ENV{'HTTP_USER_AGENT'}" ;
$path .= "&subject=$GB->{FORM}->{'subject'}" ;
$path .= "&FROM=$GB->{FORM}->{'FROM'}" ;
$path .= "&mail=$GB->{FORM}->{'mail'}" ;
$path .= "&bbs=$GB->{FORM}->{bbs}" ;
$path .= "&key=$GB->{FORM}->{key}" ;
$path .= "&MESSAGE=$GB->{FORM}->{'MESSAGE'}" ;
my $ua = LWP::UserAgent->new() ;
$ua->agent('Mozilla/5.0 FOX(2ch.bbs)') ;
$ua->timeout(3);
my $request = HTTP::Request->new('GET', $host . $path);
my $response = $ua->request($request) ;#ここで GET 処理
my $db_content = $response->content();
# エラーチェック
if ($response->is_error)
{
return "通信エラー";
}
chomp($db_content);
return $db_content;
my $host = "http://bbm2.2ch.net/xxxx/x.so?" ;
my $path = "srv=$ENV{'SERVER_NAME'}" ;
$path .= "&tane=$GB->{IDNOTANE}" ;
$path .= "&ua=$ENV{'HTTP_USER_AGENT'}" ;
$path .= "&subject=$GB->{FORM}->{'subject'}" ;
$path .= "&FROM=$GB->{FORM}->{'FROM'}" ;
$path .= "&mail=$GB->{FORM}->{'mail'}" ;
$path .= "&bbs=$GB->{FORM}->{bbs}" ;
$path .= "&key=$GB->{FORM}->{key}" ;
$path .= "&MESSAGE=$GB->{FORM}->{'MESSAGE'}" ;
my $ua = LWP::UserAgent->new() ;
$ua->agent('Mozilla/5.0 FOX(2ch.bbs)') ;
$ua->timeout(3);
my $request = HTTP::Request->new(POST => $host); #ここで POST 処理
$request->content_type('application/x-www-form-urlencoded');
$request->content($path);
my $response = $ua->request($request) ;
my $db_content = $response->content();
# エラーチェック
if ($response->is_error)
{
return "通信エラー";
}
chomp($db_content);
return $db_content; my(%pm, $ua, $request) = () ;
my $host = "http://bbm2.2ch.net/xxxx/x.so?" ;
$pm{'srv'} = $ENV{'SERVER_NAME'} ;
$pm{'tane'} = $GB->{IDNOTANE} ;
$pm{'ua'} = $ENV{'HTTP_USER_AGENT'} ;
$pm{'subject'} = $GB->{FORM}->{'subject'} ;
$pm{'FROM'} = $GB->{FORM}->{'FROM'} ;
$pm{'mail'} = $GB->{FORM}->{'mail'} ;
$pm{'bbs'} = $GB->{FORM}->{bbs} ;
$pm{'key'} = $GB->{FORM}->{key} ;
$pm{'MESSAGE'} = $GB->{FORM}->{'MESSAGE'} ;
my $ua = LWP::UserAgent->new() ;
$ua->agent('Mozilla/5.0 FOX(2ch.bbs)') ;
$ua->timeout(3);
my $request = HTTP::Request->new('GET', $host . $path);
$request = $ua -> post($host, \%pm);
my $db_content = $response->content();
# エラーチェック
if ($response->is_error)
{
return "通信エラー";
}
chomp($db_content);
return $db_content;
>>911 のように改修。
qb6 に入れてきますー 携帯からの連投あらしでテレサロ板のスレを落としまくっている奴
こいつ、どうにかしてくれ!
http://tv11.2ch.net/test/read.cgi/tvsaloon/1198474995/
このスレを落としたらまた別のスレを落とすだろう
これで何スレ目だw こうした。
my(%pm, $ua, $response) = () ;
my $host = "http://bbm2.2ch.net/xxxx/x.so?" ;
$pm{'srv'} = $ENV{'SERVER_NAME'} ;
$pm{'tane'} = $GB->{IDNOTANE} ;
$pm{'ua'} = $ENV{'HTTP_USER_AGENT'} ;
$pm{'subject'} = $GB->{FORM}->{'subject'} ;
$pm{'FROM'} = $GB->{FORM}->{'FROM'} ;
$pm{'mail'} = $GB->{FORM}->{'mail'} ;
$pm{'bbs'} = $GB->{FORM}->{bbs} ;
$pm{'key'} = $GB->{FORM}->{key} ;
$pm{'MESSAGE'} = $GB->{FORM}->{'MESSAGE'} ;
$ua = LWP::UserAgent->new() ;
$ua->agent('Mozilla/5.0 FOX(2ch.bbs)') ;
$ua->timeout(3);
$response = $ua -> post($host, \%pm);
my $db_content = $response->content();
# エラーチェック
if ($response->is_error)
{
return "通信エラー";
}
chomp($db_content);
return $db_content;
>>914
これは醜いwww
誰か携帯連投あらしを規制してやれよw 携帯だと人大杉、べっかんこのメニューにはないし
よう分からん よさげですねぇ
>>895 さんに感謝 !!
もちょっと様子見てから全サーバに配ろう。 my $host = "http://bbm2.2ch.net/xxxx/x.so?" ;
my $path = "srv=$ENV{'SERVER_NAME'}" ;
$path .= "&tane=$GB->{IDNOTANE}" ;
$path .= "&ua=$ENV{'HTTP_USER_AGENT'}" ;
$path .= "&subject=$GB->{FORM}->{'subject'}" ;
$path .= "&FROM=$GB->{FORM}->{'FROM'}" ;
$path .= "&mail=$GB->{FORM}->{'mail'}" ;
$path .= "&bbs=$GB->{FORM}->{bbs}" ;
$path .= "&key=$GB->{FORM}->{key}" ;
$path .= "&MESSAGE=$GB->{FORM}->{'MESSAGE'}" ;
my $ua = LWP::UserAgent->new() ;
$ua->agent('Mozilla/5.0 FOX(2ch.bbs)') ;
$ua->timeout(3);
my $request = HTTP::Request->new('GET', $host . $path);
my $response = $ua->request($request) ;#ここで GET 処理
my $db_content = $response->content();
# エラーチェック
if ($response->is_error)
{
return "通信エラー";
}
chomp($db_content);
return $db_content;
よくやった
厨房涙目wwwwwwwwwwwwwwwww とりあえずafoxでテストしたら俺のauで限界まで書き込めた
おい!携帯が五万円ってどういう事だ^^
http://afox.2ch.net/test/read.cgi/news4vip/1198667012/9
9 名前:以下、名無しにかわりましてVIPがお送りします。[] 投稿日:2007/12/26(水) 20:11:39.44 ID:p71iD/FRO
テスト嗚呼嗚呼嗚呼嗚呼嗚呼嗚呼嗚呼嗚呼嗚呼嗚呼あああああああああああああああああ
ああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああ
ああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああ
ああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああ
ああああああああああああああああああああああああああああああああああああああああああああああああああ
ああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああ
あああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああああ
ああああああああああああああああああああああああああああああああああああああああ
壺から
今から取り掛かろうと思ったらもうおわってんじゃねぇかwww テストは内容が無いようなスレでや ら な い か?
IDスレとか。 >>945
報告作業なんて時間かかって面倒臭いんだから
他力本願じゃ何も変わらんよ もうおわってるのか....
my $request = HTTP::Request->new('GET', $host . $path);
my $response = $ua->request($request) ;#ここで GET 処理
my $db_content = $response->content();
ここを
my $request = HTTP::Request->new('POST', $host);
$request->content_type('application/x-www-form-urlencoded');
$request->content($path);
my $response = $ua->request($request) ;#ここで GET 処理
my $db_content = $response->content();
こうするだけで良いんじゃないじゃなかろうかと思ったが
まあもうどうでもよさげね( ´・ω・`) ■宣言
次スレを立てます〜〜〜♪
テンプレあるなら・・・2以降に貼ってくださいで〜す・・・・
悪しからず〜〜です〜みま〜せん〜〜♪
WWWWWWWWWWWWWWwwwWWWWWWWWWWWWwwwwWWw←↑ >>952
そうそう・・・・WWWWWWWWWWwwwwwWWww↑→
>>953
というか、スレタイwvらないでしょ・・・・・
多分3なんだろうけど・・・3で立てるよ・・・・ FOXお疲れ。とりあえずafoxはよさげ。
他板はこれから確認してみる。 bbm2.2ch.net 側も POST に対応した。
はい、どうぞ
http://www.k4.dion.ne.jp/~yukio/LOVELOG_IMG/DSCF0201.JPG
>>958
違うでしょ・・・・
■ もちつけ2.0★3
とかじゃん???
BBM2.0 っていう新BBMについてのスレッドじゃないの??
WWWWWWWWWWWWWWwwwwWWWWWWWWWWWWwwwwWWw←↑ 狐が言う前スレってもちつけ1.0のスレのことじゃないか?
それなら
■ もちつけ2.1
でおk >>960
そのとーり
ついでにこれを新スレに貼っといて
544:FOX ★[]
2007/12/26(水) 00:19:01 ID:???0
今後の予定は、
1) 迷惑行為を点数加算制にする。
2) 点数がある程度行ったら、書き込み停止。
3) しばらくしたら停止を解除。
4) 頻繁に停止される人は、ずーっと停止。
5) 迷惑行為は規制議論板の報告を見ながら順次追加。
http://qb5.2ch.net/test/read.cgi/operate/1197013918/544 >>1
> 「もちつけ規制2.0」を作る会。
↑
だから、2.0は変えられない・・・・もうめんどうだから、このスレを1、
そして前スレを関連スレという事にする・・・・勿論前スレの紹介はしない・・悪しからず〜〜♪
WWWWWWWWWWWWwwwwwWWWWWWWWWwwwwwwwwWWw←↑ >>963
ほいほい・・・・(笑)
WWWWWWWWWWWWWWwwwwwWWWWWWwwwwwWwww←↑ ■ もちつけ2.0 第二回もちつき大会
これでおk >>966
見てらんないのはオマエだーw
961:動け動けウゴウゴ2ちゃんねる[sage]
2007/12/26(水) 20:41:10 ID:uFdxUATtO
■ もちつけ2.3
↑これでおk 固有番号等をキーにして「もちつけ規制2.0」を作る会。
前スレ
■ もちつけ2.0
http://qb5.2ch.net/test/read.cgi/operate/1197013918/
前々スレ
どっかいってしまった。
携帯からの連投あらしが減ればいいなぁ(BBM2.0なのだ)
問題点
・書き込もうとすると「はじめまして」ページが登場(レス消失)。一度書けばしばらく出ないが、しばらくするとまた「はじめまして」
・長文&AA(短いAAならOK)を書こうとすると通信エラーという規約同意ページ。同意して再投稿するとまた通信エラー
・一部の専ブラは短文書き込みすら不能(べっかんこが多い?機種の関係もあるかも)
・更に一部の専ブラは長文も大丈夫(domo?) >>968
>>973が立ってたんで〜そこに貼ってきました〜〜(笑)
WWWWWWWWWWWWWwwwwWWWWWWWWwwwwwwwWww←↑ >>974
頼んでおきながら余計なことしてしまった・・・
ごめんよー >>824
>my $request = HTTP::Request->new('GET', $host . $path);
GETをPOSTにすりゃいんじゃね?
5秒しかみてないけど・・・
>>959
誰かがやると思った
1000なら明日は大雪 もちつけ2.0ってなんだよ
スレストの邪魔すんなよ死ね 携帯しかない人は視野が狭いんだな
スレの移動がメンドクサイのが原因 急に流れが止まった件
もうすぐ1000だからkskすると思ったのに
\∧_ヘ / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
,,、,、,,, / \〇ノゝ∩ < 1000取り合戦、いくぞゴ……!! ,,、,、,,,
/三√ ゚Д゚) / \____________ ,,、,、,,,
/三/| ゚U゚|\ ,,、,、,,, ,,、,、,,,
,,、,、,,, U (:::::::::::) ,,、,、,,,
//三/|三|\ ,,,, ,,、,、,,,
∪ ∪
,, , ,,,, ,,、,、,,, ,,、,、,,,
,,,,, ∧_∧ うまいモナー,,,,, 、 ,,,,,, ,,,,,,,, ,,,,,
,,, ( ´∀`)___,,,,___ ,, ∧_∧ ゲンキニ シテルカナ・・・___,,
/ ̄ ( つ日ヽ ∧_∧ ( ) /
/ (__)) (´∀` ) ( ) ∧_∧∧_∧ / マターリモナー
∧_∧∧_∧ドーゾ (日ノ ) | | | ( ´∀`) ´∀`)
( ´∀`) ´∀`) ((__) ,(_(_) (○)⊂ ) つ日⊂ ) モーナー
―(つ⊂ ) つ⊂ )―――――――――――ヽ|〃(⌒)(⌒) (⌒)(⌒)
(⌒)(⌒) (⌒)(⌒)グーグー
こんなかんじだなw このスレッドは1000を超えました。
もう書けないので、新しいスレッドを立ててくださいです。。。 レス数が1000を超えています。これ以上書き込みはできません。