歪んだ性欲をぶつけたいゆるゆりキャラ ★20

[1 名無しの七森(大室) (ﾜｯﾁｮｲ fb99-LMK2) 2021/09/23(木) 09:17:11.90]

!extend:checked:vvvvv:1000:512
!extend:checked:vvvvv:1000:512
↑冒頭にコレを三行重ねてスレを立ててください

1 名無しの七森 2016/11/29(火) 20:32:39.50
りせちゃんにキモオタ共が出したジョッキ一杯分のザーメン無理矢理飲ませたい
その後イラマで精子ゲロ吐かせたい
吐いた分を浣腸して肛門に栓ねじ込んで我慢させた後、噴き出た下痢便つきザーメンを少しずつゆっくり咀嚼させて完飲させたい


※前スレ
歪んだ性欲をぶつけたいゆるゆりキャラ ★19
https://agree.5ch.net/test/read.cgi/akari/1631060682/

---

VIPQ2_EXTDAT: checked:vvvvv:1000:512:: EXT was configured

[636 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 10:24:21.76]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapkmpm

[637 名無しの七森(池田) (ﾃﾃﾝﾃﾝﾃﾝ MMde-f6Pu) 2021/09/25(土) 10:24:50.74]

>>530
歳納が酷い目にあった姿はごらく部生徒会メンバーみんなに見せたいね
無駄に人望を集めてるから一番全員が阿鼻叫喚になりそうなキャラだ

[638 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 10:25:33.50]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapjapdmp

[639 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 10:26:27.71]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapkp

[640 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 10:27:11.20]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapmjp

[641 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 10:28:36.67]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-ngUA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapkpOMMMMMNMMMMNMmMNMMMMMMNMMMMNMM

[642 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 10:29:11.40]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapmpMMmNMMMMNMMMNMMMMMMMNMMMMMMMNMMMNMMMMMMNMMNMMNMMOMMMMMMNMMMNMMMMNmMMMNMnMNMMMMNMMMMMMm

[643 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 10:29:26.20]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapmpepmpmpoj

[644 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 10:29:34.12]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapep

[645 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 10:29:44.00]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapwpan@

[646 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 10:29:56.33]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapmpmpnpmpmpnpmpmpmpmpmpNMMmWmxMMNMMMMMNm

[647 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 10:30:06.17]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapdpdm

[648 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 10:32:23.57]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmaptpNmj

[649 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 10:33:02.90]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' mpdpM=> 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapwpwMN

[650 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 10:33:42.47]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapd3767npmgd

[651 名無しの七森(池田) (ｻｻｸｯﾃﾛﾚ Sp47-cuoO) 2021/09/25(土) 10:34:47.78]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapjpmpmmpm

[652 名無しの七森(池田) (ｻｻｸｯﾃﾛﾚ Sp47-cuoO) 2021/09/25(土) 10:34:56.29]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmap

p
pp
p

[653 名無しの七森(池田) (ｻｻｸｯﾃﾛﾚ Sp47-cuoO) 2021/09/25(土) 10:35:09.16]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmap
p


p


pp


p

p

pp

p

[654 名無しの七森(池田) (ｻｻｸｯﾃﾛﾚ Sp47-cuoO) 2021/09/25(土) 10:36:08.74]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmap
gp

[655 名無しの七森(池田) (ｻｻｸｯﾃﾛﾚ Sp47-cuoO) 2021/09/25(土) 10:37:04.34]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmap
gwj

[656 名無しの七森(池田) (ｻｻｸｯﾃﾛﾚ Sp47-cuoO) 2021/09/25(土) 10:37:22.25]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapmpw

[657 名無しの七森(池田) (ｻｻｸｯﾃﾛﾚ Sp47-cuoO) 2021/09/25(土) 10:39:02.35]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');jp
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmap
pw
p

[658 名無しの七森(池田) (ｻｻｸｯﾃﾛﾚ Sp47-cuoO) 2021/09/25(土) 10:39:58.46]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->jpnew;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapngm

[659 名無しの七森(池田) (ｻｻｸｯﾃﾛﾚ Sp47-cuoO) 2021/09/25(土) 10:43:12.26]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapkg

[660 名無しの七森(池田) (ｻｻｸｯﾃﾛﾚ Sp47-cuoO) 2021/09/25(土) 10:45:01.91]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmap
gm

[661 名無しの七森(池田) (ｻｻｸｯﾃﾛﾚ Sp47-cuoO) 2021/09/25(土) 10:45:59.33]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmap
p


gm
pqnpngmwgwgmpmp


pmgdmgj

[662 名無しの七森(池田) (ｻｻｸｯﾃﾛﾚ Sp47-cuoO) 2021/09/25(土) 10:47:18.65]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapg

[663 名無しの七森(池田) (ｻｻｸｯﾃﾛﾚ Sp47-cuoO) 2021/09/25(土) 10:48:52.37]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmappwmp

[664 名無しの七森(池田) (ｻｻｸｯﾃﾛﾚ Sp47-cuoO) 2021/09/25(土) 10:58:42.55]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapw

[665 名無しの七森(吉川) (ﾜｯﾁｮｲ 5f62-0Wlz) 2021/09/25(土) 11:02:35.26]

>>637
https://i.imgur.com/0zuHDLP.jpg
こんなのとかどうかな？
あかりの悲鳴が堪らないね

[666 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 11:03:23.15]

d = fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpj

[667 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 11:09:00.69]

fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjx

[668 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 11:12:24.43]

fork()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjt

[669 名無しの七森(池田) (ｻｻｸｯﾃﾛﾚ Sp47-cuoO) 2021/09/25(土) 11:23:49.76]

k()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjt

[670 名無しの七森(池田) (ｻｻｸｯﾃﾛﾛ Sp47-cuoO) 2021/09/25(土) 11:27:34.36]

k()) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtjg

[671 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 11:33:14.80]

)) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjt

[672 名無しの七森(池田) (ｻｻｸｯﾃﾛﾛ Sp47-cuoO) 2021/09/25(土) 11:40:25.05]

)) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtjg

[673 名無しの七森(池田) (ｻｻｸｯﾃﾛﾛ Sp47-cuoO) 2021/09/25(土) 11:43:30.62]

)) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtk

[674 名無しの七森(吉川) (ﾜｯﾁｮｲ 5f62-Kqys) 2021/09/25(土) 11:45:08.44]

>>631
僕もブロマイドでシコってる
やや高いけどマジでありがたいよな

[675 名無しの七森(池田) (ｻｻｸｯﾃﾛﾛ Sp47-cuoO) 2021/09/25(土) 11:45:41.18]

)) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->jagent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjt

[676 名無しの七森(池田) (ｻｻｸｯﾃﾛﾛ Sp47-cuoO) 2021/09/25(土) 11:56:56.87]

)) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtたな

[677 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 11:59:09.72]

)) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtkpjtta

[678 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 11:59:21.05]

)) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtjtgjtkhpujprhjt

[679 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 11:59:40.10]

)) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtたpkw

[680 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 11:59:57.26]

)) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtptjtpgku

[681 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:00:23.77]

)) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtpgkvagtwm

[682 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:00:44.08]

)) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtlg

[683 名無しの七森(池田) (ﾜｯﾁｮｲ 1799-t/PR) 2021/09/25(土) 12:01:06.44]

ごらく部と生徒会8人を集めて
ランダムにペアを組ませてシックスナインを強制したい

京子「ごめんね、ごめんね、ひまっちゃんおまんこ舐めんね・・・ﾍﾟﾛﾍﾟﾛﾁﾛﾁﾛ」
向日葵「大丈夫ですわ、歳納先輩も舐めますわね・・・失礼します・・ﾁｭｯｽﾞﾁｭ・・・あぁ・・
私他人のおまんこ舐めてるんですわぁ・・すごい・・・」
西垣「古谷、それは舐めるって言わないぞ、ほらこうやってワレメをくぱあって広げて！そう、舌入れて
唾液出しながらペロペロってかき混ぜて」
京子「やぁん・・・おまんこ舐められてる・・・そんな奥まで舌っ・・いやぁん・・・」
西垣「歳納、舌の感触あったかくて気持ちいいだろ？どんどん気持ちよくなってくるからな」

ちなつ「じゃあ杉浦先輩なめますね・・・」
綾乃「・・・・////」
ちなつ「杉浦先輩すごい恥ずかしがってる・・・」
西垣「すごいな杉浦は、お尻の穴まで陰毛びっしり生えてるぞ？人は見かけによらないな」
綾乃「いやぁあん見ないでぇええええ！！」
西垣「ハハハッ！恥ずかしいか？女性器丸見えだぞ杉浦」
ちなつ「私たちの人としての尊厳がめちゃくちゃです・・・信じられないぐらい酷いです・・・」
西垣「吉川なんか言ったか？ほらこうやって陰毛かき分けてビラビラ広げて、はやく舌突っ込んで。つばでグチョグチョにしながらな」
ちなつ「じゃあ行きますね・・・・くぱぁ・・・ペロペロペロペロペロッ（あぁっ臭い・・・・これが他人のおまんこの臭いなのね・・・）」
綾乃「吉川さんだめえええええ！（私、歳納京子のすぐ隣でおまんこ舐められてる・・・もう死にたい・・・）」

[684 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:01:28.84]

)) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjthjtた

[685 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:02:09.66]

)) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjt@gta#tojuhgj

[686 名無しの七森(歳納) (ｱｳｱｳｳｰ Sa43-f6Pu) 2021/09/25(土) 12:03:38.26]

>>665
失禁好き
普通のおしっこと比べてさらさらしてるイメージがある
俺がショックによって失禁したのは一度しかないが

[687 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:09:36.05]

)) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtmdg

[688 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:11:04.58]

)) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtwpwpdj

[689 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:13:53.34]

)) {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtng

[690 名無しの七森(吉川) (ﾜｯﾁｮｲ 5f62-0Wlz) 2021/09/25(土) 12:14:08.23]

https://i.imgur.com//OGQarsE.jpg
https://i.imgur.com/2BExiHu.jpg
性欲スレ二大殺害系キャラ
例の綾乃の惨殺絵、ピクシブが出典元だったわけか
同じ作者の櫻子も最高だね！

[691 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:20:39.29]

{
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmjp

[692 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:33:13.97]

{
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngjp

[693 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:39:12.59]

{
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmag

[694 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:47:40.71]

$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmag
wdap

[695 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:48:46.27]

$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpng

[696 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:50:08.87]

$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmag66なmjp

[697 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:50:19.98]

$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmtapmp

[698 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:50:32.92]

$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagwpmdpmjpjp

[699 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:50:45.12]

$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmag
pMmDDMMMnpmpmp

[700 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:51:03.60]

$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmpxppqppp
pp
qwpwpWw




p

[701 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:53:07.14]

$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmpkpmpmpmpnp

[702 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:56:14.49]

$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagnp

[703 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 12:59:50.42]

$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagnpng

[704 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:00:39.57]

$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjg

[705 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:01:58.61]

$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagng

[706 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:07:45.72]

$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjgmpngn

[707 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:09:35.59]

$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagjg

[708 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:14:52.07]

$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagdg

[709 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:18:21.24]

$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjp

[710 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:24:04.78]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjppjv

[711 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:25:27.50]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpatg

[712 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:28:05.35]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpmdg

[713 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:30:00.74]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpmp

[714 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:31:20.82]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjp?.?

[715 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:31:30.53]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpkgwm

[716 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:31:40.15]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpmjpnm

[717 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:31:48.93]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpmpDMmjpjpmpm

[718 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:32:06.33]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpmpm

[719 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:34:09.60]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpkg

[720 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:34:44.40]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpjt

[721 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:37:06.51]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpgtamk

[722 名無しの七森(吉川) (ﾜｯﾁｮｲ 5f62-0Wlz) 2021/09/25(土) 13:37:14.77]

https://i.imgur.com/ihAF9AI.jpg
櫻子を縛り上げたい

[723 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:41:26.94]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpk

[724 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:46:26.22]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpgt

[725 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:47:06.80]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpjtg

[726 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:47:56.38]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpgmug

[727 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:48:16.21]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpkajg@j

[728 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:48:31.87]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpgjh@@j

[729 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:49:12.15]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpjtgはjwpm

[730 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:52:52.57]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpmjp

[731 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 13:55:10.97]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpmJMNMnm

[732 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 14:10:40.14]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpj

[733 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 14:12:09.97]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpjtp

[734 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 14:13:56.36]

rmdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpjw

[735 名無しの七森(池田) (ｻｻｸｯﾃﾛﾗ Sp47-cuoO) 2021/09/25(土) 14:19:21.90]

mdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpjwmjp

[736 名無しの七森(池田) (ｻｻｸｯﾃﾛﾘ Sp47-cuoO) 2021/09/25(土) 14:23:51.13]

req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
print $message,"\n";
if ($res->is_success) {
print $res->content;
}
else {
print $res->status_line, "\n";
}
wait();
} else {
$formdata{MESSAGE}=$message;
my $req = POST( "http://";.$server."/test/bbs.cgi", [%formdata] );
$req->referer("http://";.$server."/".$bbs."/");
$req->header( 'Accept' => 'text/html' );
my $res = $ua->request($req);
kill 1, $pid;
exit(1);
}
sleep $sleep;
}
exit(0);

sub login {
my ( $id, $pw ) = @_;
my $ua = LWP::UserAgent->new;
$ua->agent('DOLIB/1.00');
$ua->default_header( 'X-2ch-UA' => 'Monazilla/1.00' );
my $url = 'https://2chv.tora3.net/futen.cgi';dmaegPjtpgp'b ead pdf [e-mail]???????mw.「」\82jtafjmmapgやかやかたjpjjtngmagmjpjwmagdgnh