おいおまいら、WebProg板でもこのスレをやってみましょう、おながいします。
ただし、*99があまりにも難しすぎるお題だったり、荒らし、明らかに厨発言だった場合、
*98さんに繰り下げするとかでおながいします。
というわけでまずは>>99-100おながいします。
*99の指定したCGIを*00が作るスレ
1nobodyさん
02/11/17 11:43ID:r2gR01qm221nobodyさん
02/12/15 15:51ID:??? 次はどんなご注文で？
222nobodyさん
02/12/15 16:32ID:??? 激萌えぁゃゃcgiをきぼんぬ
223nobodyさん
02/12/16 12:58ID:kYAlrIEv225nobodyさん
02/12/20 14:24ID:bSnvNs3j http://live.2ch.net/test/read.cgi/festival/1040349157/
TIME投稿ツールｷﾎﾞﾝぬ
TIME投稿ツールｷﾎﾞﾝぬ
228nobodyさん
02/12/20 23:38ID:??? おまいら趣旨を理解しやがってください。
229nobodyさん
02/12/24 23:42ID:2kS8TiT1 メリクリ
230nobodyさん
02/12/25 17:15ID:U7g6MD4O >>229
ｸﾘﾒﾘ
ｸﾘﾒﾘ
231nobodyさん
02/12/25 21:45ID:??? ｳﾞｧﾘｭｸﾘ
232nobodyさん
02/12/27 09:52ID:PDegbcoZ クリスマス以降寂れたのか？
233nobodyさん
02/12/31 10:34ID:2j4SuGi0 100ではないが99のはこんなんで良いのか？
URL取得部分が激甘なのでmailtoとか他のサイトの部分まで拾って痛いが（藁
#!/usr/local/bin/perl -w
use Socket;
$boardList = "board_list.dat";
if(!(-e $boardList)) {
$method = "GET";
$host = "www.ff.iij4u.or.jp";
$path = "~ch2/bbsmenu.html";
$port = getservbyname('http', 'tcp');
$iaddr = inet_aton($host) || die "$connect_hostは存在しないホストです。\n";
$sock_addr = pack_sockaddr_in($port, $iaddr);
socket(SOCKET, PF_INET, SOCK_STREAM, 0) || die "ソケットを生成できません。\n";
connect(SOCKET, $sock_addr) || die "$connect_host の ポート$portに接続できません。\n";
select(SOCKET); $|=1; select(STDOUT);
print SOCKET "$method /$path HTTP/1.0\r\n";
print SOCKET "User-Agent: 2ch roulette/0.0 \r\n";
print SOCKET "\r\n";
URL取得部分が激甘なのでmailtoとか他のサイトの部分まで拾って痛いが（藁
#!/usr/local/bin/perl -w
use Socket;
$boardList = "board_list.dat";
if(!(-e $boardList)) {
$method = "GET";
$host = "www.ff.iij4u.or.jp";
$path = "~ch2/bbsmenu.html";
$port = getservbyname('http', 'tcp');
$iaddr = inet_aton($host) || die "$connect_hostは存在しないホストです。\n";
$sock_addr = pack_sockaddr_in($port, $iaddr);
socket(SOCKET, PF_INET, SOCK_STREAM, 0) || die "ソケットを生成できません。\n";
connect(SOCKET, $sock_addr) || die "$connect_host の ポート$portに接続できません。\n";
select(SOCKET); $|=1; select(STDOUT);
print SOCKET "$method /$path HTTP/1.0\r\n";
print SOCKET "User-Agent: 2ch roulette/0.0 \r\n";
print SOCKET "\r\n";
234nobodyさん
02/12/31 10:34ID:2j4SuGi0 続き
while (<SOCKET>){
m/^\r\n$/ && last;
}
open(LIST, "> $boardList");
while (<SOCKET>){
if($_ =~ /HREF=([^> ]+)/) {
print LIST "$1\n";
}
}
close(LIST);
}
open(LIST, $boardList);
@board = <LIST>;
close(LIST);
srand(time^$$);
$num = rand($#board);
print "Location:$board[$num]\n\n";
while (<SOCKET>){
m/^\r\n$/ && last;
}
open(LIST, "> $boardList");
while (<SOCKET>){
if($_ =~ /HREF=([^> ]+)/) {
print LIST "$1\n";
}
}
close(LIST);
}
open(LIST, $boardList);
@board = <LIST>;
close(LIST);
srand(time^$$);
$num = rand($#board);
print "Location:$board[$num]\n\n";
235_
02/12/31 10:48ID:gfphPIoL236nobodyさん
02/12/31 13:16ID:qLQW6luA おゆ〜
237nobodyさん
03/01/04 20:27ID:tm/4/3y9 >>233
もうちょっと読みやすくつくってｸﾚ
もうちょっと読みやすくつくってｸﾚ
239nobodyさん
03/01/04 21:21ID:uoWySJDJ 読みにくい。
注釈文をいれようょ
注釈文をいれようょ
241nobodyさん
03/01/06 16:15ID:vXxmrd3Z あげ
242nobodyさん
03/01/10 16:05ID:??? Perl らしくない。
もうちょっと呪文を混ぜようょ
もうちょっと呪文を混ぜようょ
243nobodyさん
03/01/11 12:22ID:9FJE/Arw Perl らしくない。
もうちょっと電波を混ぜようょ
もうちょっと電波を混ぜようょ
246nobodyさん
03/01/13 01:58ID:zFhrRpi4 if($a == 1){
#--VBじゃねえんだぞ----
# $a = $a + 1;
$a++;
}
#--VBじゃねえんだぞ----
# $a = $a + 1;
$a++;
}
249nobodyさん
03/01/13 13:20ID:??? <?
//programmed by moguno This script is copyleft.
//2ちゃんねるメニューからURLリストを取得
function getURLList($local)
{
//ファイル名を決定
if($local)
$filename = "./2chmenu.html";
else
$filename = "http://www6.ocn.ne.jp/~mirv/2chmenu.html";
//ファイルを読み込む
$dat = file($filename);
$res = array();
foreach($dat as $d)
{
//リンク先一覧を取得
preg_match("/<A HREF=([^\\>]+)>/",$d,$matches);
if($matches[1] == NULL)
continue;
$match = $matches[1];
//2ch以外のドメインと2chトップページへのリンクを除外
if(preg_match("/2ch\\.net\\/.+$/",$match) == 0)
//programmed by moguno This script is copyleft.
//2ちゃんねるメニューからURLリストを取得
function getURLList($local)
{
//ファイル名を決定
if($local)
$filename = "./2chmenu.html";
else
$filename = "http://www6.ocn.ne.jp/~mirv/2chmenu.html";
//ファイルを読み込む
$dat = file($filename);
$res = array();
foreach($dat as $d)
{
//リンク先一覧を取得
preg_match("/<A HREF=([^\\>]+)>/",$d,$matches);
if($matches[1] == NULL)
continue;
$match = $matches[1];
//2ch以外のドメインと2chトップページへのリンクを除外
if(preg_match("/2ch\\.net\\/.+$/",$match) == 0)
250nobodyさん
03/01/13 13:21ID:??? continue;
//2ちゃんねる総合案内を除外
if(preg_match("/\\/guide/",$match) == 1)
continue;
//配列に追加
array_push($res,$matches[1]);
}
return $res;
}
//***初期化***
srand(time());
//外部へのHTTP通信を許可しているサーバならfalse。
//許可していない場合はhttp://www6.ocn.ne.jp/~mirv/2chmenu.htmlをダウンロードし
//こいつと同じディレクトリに2chmenu.htmlとして保存した後trueに書き換え。
$list = getURLlist(false);
?>
<html>
<head>
<META HTTP-EQUIV="refresh" CONTENT="0;URL=<?print($list[rand(0,count($list))]);?>">
</head>
</html>
//2ちゃんねる総合案内を除外
if(preg_match("/\\/guide/",$match) == 1)
continue;
//配列に追加
array_push($res,$matches[1]);
}
return $res;
}
//***初期化***
srand(time());
//外部へのHTTP通信を許可しているサーバならfalse。
//許可していない場合はhttp://www6.ocn.ne.jp/~mirv/2chmenu.htmlをダウンロードし
//こいつと同じディレクトリに2chmenu.htmlとして保存した後trueに書き換え。
$list = getURLlist(false);
?>
<html>
<head>
<META HTTP-EQUIV="refresh" CONTENT="0;URL=<?print($list[rand(0,count($list))]);?>">
</head>
</html>
251nobodyさん
03/01/13 13:28ID:??? <META HTTP-EQUIV="refresh" CONTENT="0;URL=<?print($list[rand(0,count($list) - 1)]);?>">
に訂正。
に訂正。
252nobodyさん
03/01/13 14:03ID:??? このまま300いくに1000php
253nobodyさん
03/01/14 18:08ID:7L6kWj+N 無視して次のおだいまでAGE
256山崎渉
03/01/15 13:31ID:??? （＾＾）
257nobodyさん
03/01/17 01:37ID:BIc4KCgY >>254
山崎渉をあげるから逝って来い
山崎渉をあげるから逝って来い
261nobodyさん
03/01/17 22:20ID:??? 100本人じゃないとだめっしょ
そういうスレ
そういうスレ
262nobodyさん
03/01/19 23:49ID:NJuI9Ez7263nobodyさん
03/01/20 02:51ID:??? 263
264nobodyさん
03/02/01 01:35ID:??? age
266山崎渉
03/03/13 17:22ID:??? （＾＾）
267nobodyさん
03/03/30 23:03ID:??? うんこ
268nobodyさん
03/03/30 23:03ID:2BSCR98U269nobodyさん
03/03/31 02:15ID:??? *99を利用してなんか無理矢理作ってみるってのはどうだ？
270nobodyさん
03/03/31 03:05ID:??? なんか久しぶりに動いたな、このスレ。
271山崎渉
03/04/17 12:11ID:??? （＾＾）
272山崎渉
03/04/20 06:22ID:??? ∧＿∧
（ ＾＾ ）＜ ぬるぽ（＾＾）
（ ＾＾ ）＜ ぬるぽ（＾＾）
273age
03/05/05 13:53ID:??? age
274nobodyさん
03/05/05 14:06ID:zlc2Jh4q275age
03/05/11 15:09ID:??? age
276bloom
03/05/11 15:10ID:D5AlwyCG277435
03/05/11 16:16ID:??? 無能な１００がいるスレはここでつか？
279動画直リン
03/05/21 13:08ID:JZ9K0e/X280かおりん祭り
03/05/21 13:08ID:??? 〜oノハヽo〜 http://togoshi.ginza.st/kaorin/
( ＾▽＾) ＜ こんなのがございまーす♪
http://togoshi.ginza.st/kaorin/kaorin05.html
http://www.togoshi.ginza.st/kaorin/kaorin02.html
http://togoshi.ginza.st/kaorin/kaorin06.html
http://www.togoshi.ginza.st/kaorin/kaorin08.html
http://togoshi.ginza.st/kaorin/kaorin01.html
http://www.togoshi.ginza.st/kaorin/kaorin10.html
http://togoshi.ginza.st/kaorin/kaorin04.html
http://www.togoshi.ginza.st/kaorin/kaorin03.html
http://togoshi.ginza.st/kaorin/kaorin09.html
http://www.togoshi.ginza.st/kaorin/kaorin07.html
( ＾▽＾) ＜ こんなのがございまーす♪
http://togoshi.ginza.st/kaorin/kaorin05.html
http://www.togoshi.ginza.st/kaorin/kaorin02.html
http://togoshi.ginza.st/kaorin/kaorin06.html
http://www.togoshi.ginza.st/kaorin/kaorin08.html
http://togoshi.ginza.st/kaorin/kaorin01.html
http://www.togoshi.ginza.st/kaorin/kaorin10.html
http://togoshi.ginza.st/kaorin/kaorin04.html
http://www.togoshi.ginza.st/kaorin/kaorin03.html
http://togoshi.ginza.st/kaorin/kaorin09.html
http://www.togoshi.ginza.st/kaorin/kaorin07.html
281nobodyさん
03/05/21 14:36ID:??? 281
282nobodyさん
03/05/21 14:36ID:??? 282
283nobodyさん
03/05/21 14:37ID:??? 283
284nobodyさん
03/05/21 14:37ID:??? 284
285nobodyさん
03/05/21 14:37ID:??? 285
286nobodyさん
03/05/21 14:37ID:??? 286
287nobodyさん
03/05/21 14:37ID:??? 287
288nobodyさん
03/05/21 14:38ID:??? 288
289nobodyさん
03/05/21 14:38ID:??? 289
290nobodyさん
03/05/21 16:58ID:??? 290
291nobodyさん
03/05/21 16:58ID:??? 291
292nobodyさん
03/05/21 16:58ID:??? 292
293nobodyさん
03/05/21 16:59ID:??? 293
294nobodyさん
03/05/21 16:59ID:??? 294
295nobodyさん
03/05/21 16:59ID:??? 295
296nobodyさん
03/05/21 16:59ID:??? 296
297nobodyさん
03/05/21 16:59ID:??? 297
298nobodyさん
03/05/21 17:00ID:??? 298
299nobodyさん
03/05/21 18:33ID:??? SARSの死者の自動カウントCGI
300３００か３０１
03/05/21 20:15ID:grDsgXvz OK
で、cgiってなんだ？
で、cgiってなんだ？
301山崎渉
03/05/22 01:57ID:??? ━―━―━―━―━―━―━―━―━[JR山崎駅（＾＾）]━―━―━―━―━―━―━―━―━―
302山崎渉
03/05/28 17:21ID:??? ∧＿∧
ﾋﾟｭ.ｰ ( ＾＾ ） ＜これからも僕を応援して下さいね（＾＾）。
＝〔~∪￣￣〕
＝ ◎――◎ 山崎渉
ﾋﾟｭ.ｰ ( ＾＾ ） ＜これからも僕を応援して下さいね（＾＾）。
＝〔~∪￣￣〕
＝ ◎――◎ 山崎渉
303神ぽ。
03/05/30 15:18ID:??? どうよ
304_
03/05/30 15:26ID:???305nobodyさん
03/05/30 18:15ID:GJUSi001 (・∀・)ｲｲ懸賞サイト、お小遣いサイトをピックアップして紹介しています
月に1万円以上は稼げそうにないけど、4000円ぐらいなら確実に稼げます！！
無料登録するだけで商品券が貰えるサイトなども載せてあります
http://f15.aaacafe.ne.jp/~suikas/present.html
月に1万円以上は稼げそうにないけど、4000円ぐらいなら確実に稼げます！！
無料登録するだけで商品券が貰えるサイトなども載せてあります
http://f15.aaacafe.ne.jp/~suikas/present.html
307perlお勉強中
03/07/12 15:28ID:FW3/pTdg >>99ネタ#1
#/usr/local/bin/perl
use Socket;
use FileHandle;
$list_url = 'http://www.ff.iij4u.or.jp/~ch2/bbsmenu.html';
&get_list;
srand(time|$$);
$url = $list[rand(@list)];
if ($ENV{'PERLXS'} eq "PerlIS") {
print "HTTP/1.0 302 Temporary Redirection\r\n";
print "Content-type: text/html\n";
}
print "Location: $url\n\n";
exit;
#/usr/local/bin/perl
use Socket;
use FileHandle;
$list_url = 'http://www.ff.iij4u.or.jp/~ch2/bbsmenu.html';
&get_list;
srand(time|$$);
$url = $list[rand(@list)];
if ($ENV{'PERLXS'} eq "PerlIS") {
print "HTTP/1.0 302 Temporary Redirection\r\n";
print "Content-type: text/html\n";
}
print "Location: $url\n\n";
exit;
308perlお勉強中
03/07/12 15:29ID:FW3/pTdg >>99ネタ#2
sub get_list {
$list_url =~ m!(http:)?(//)?([^:/]*)?(/.*)?!;
if ($3) {$_host = $3;}
if ($4) {$_path = $4;}
$_ip = inet_aton($_host) || die "host($_host) not found.\n";
$_sockaddr = pack_sockaddr_in(80, $_ip);
socket(SOCKET, PF_INET, SOCK_STREAM, 0) || die "socket error.\n";
# ソケットの接続
connect(SOCKET, $_sockaddr) || die "connect $_host error.\n";
autoflush SOCKET (1);
# HTTP要求を送信
print SOCKET "GET $_path HTTP/1.1\n";
print SOCKET "Host: $_host\n";
print SOCKET "Connection: close\n\n";
# HTTP応答を受信
while (<SOCKET>) {
last if(/^\n$/);
}
while (<SOCKET>) {
push @list, "$&" if(m!(http\:[\w\.\~\-\/\?\&\+\=\:\@\%\;\#\%]+)!);
}
}
sub get_list {
$list_url =~ m!(http:)?(//)?([^:/]*)?(/.*)?!;
if ($3) {$_host = $3;}
if ($4) {$_path = $4;}
$_ip = inet_aton($_host) || die "host($_host) not found.\n";
$_sockaddr = pack_sockaddr_in(80, $_ip);
socket(SOCKET, PF_INET, SOCK_STREAM, 0) || die "socket error.\n";
# ソケットの接続
connect(SOCKET, $_sockaddr) || die "connect $_host error.\n";
autoflush SOCKET (1);
# HTTP要求を送信
print SOCKET "GET $_path HTTP/1.1\n";
print SOCKET "Host: $_host\n";
print SOCKET "Connection: close\n\n";
# HTTP応答を受信
while (<SOCKET>) {
last if(/^\n$/);
}
while (<SOCKET>) {
push @list, "$&" if(m!(http\:[\w\.\~\-\/\?\&\+\=\:\@\%\;\#\%]+)!);
}
}
309nobodyさん
03/07/12 15:55ID:???310perlお勉強中
03/07/12 16:37ID:??? >>299のネタ
#/usr/local/bin/perl
use Socket;
use FileHandle;
# 最新のURLを探索
$list_url = 'http://www.who.int/csr/sars/country/en/';
$key = 'Full text';
&http_connect;
while (<SOCKET>) {
last if(/$key/);
}
close(SOCKET);
# SARS情報を取得
$list_url="http://www.who.int".$&."/" if(m!(/[\w\.\~\-\/\?\&\+\=\:\@\%\;\#\%]+)!);
$list_url =~ s/entity\///;
$key = 'Total';
&http_connect;
while (<SOCKET>) {
last if(/$key/);
}
# 行数決め打ちで死亡者数を切り出し
for($i=0;$i<24;$i++) {$number=<SOCKET>;}
$number =~ m/\d+/; $number = $&;
#結果表示
print "Content-type: text/html\n\n";
print "<html lang=\"jp\"><body>";
print "SARSによる死者数は$number人です\n<br>";
print "ソ\ース：$list_url\n</body></html>\n";
close(SOCKET);
exit;
#/usr/local/bin/perl
use Socket;
use FileHandle;
# 最新のURLを探索
$list_url = 'http://www.who.int/csr/sars/country/en/';
$key = 'Full text';
&http_connect;
while (<SOCKET>) {
last if(/$key/);
}
close(SOCKET);
# SARS情報を取得
$list_url="http://www.who.int".$&."/" if(m!(/[\w\.\~\-\/\?\&\+\=\:\@\%\;\#\%]+)!);
$list_url =~ s/entity\///;
$key = 'Total';
&http_connect;
while (<SOCKET>) {
last if(/$key/);
}
# 行数決め打ちで死亡者数を切り出し
for($i=0;$i<24;$i++) {$number=<SOCKET>;}
$number =~ m/\d+/; $number = $&;
#結果表示
print "Content-type: text/html\n\n";
print "<html lang=\"jp\"><body>";
print "SARSによる死者数は$number人です\n<br>";
print "ソ\ース：$list_url\n</body></html>\n";
close(SOCKET);
exit;
311perlお勉強中
03/07/12 16:38ID:??? >>299のネタ#2
# socket接続
sub http_connect {
$list_url =~ m!(http:)?(//)?([^:/]*)?(/.*)?!;
if ($3) {$_host = $3;}
if ($4) {$_path = $4;}
$_ip = inet_aton($_host) || die "host($_host) not found.\n";
$_sockaddr = pack_sockaddr_in(80, $_ip);
socket(SOCKET, PF_INET, SOCK_STREAM, 0) || die "socket error.\n";
# ソケットの接続
connect(SOCKET, $_sockaddr) || die "connect $_host error.\n";
autoflush SOCKET (1);
# HTTP要求を送信
print SOCKET "GET $_path HTTP/1.1\n";
print SOCKET "Host: $_host\n";
print SOCKET "Connection: close\n\n";
# HTTP応答を受信
while (<SOCKET>) {
last if(/^\n$/);
}
}
# socket接続
sub http_connect {
$list_url =~ m!(http:)?(//)?([^:/]*)?(/.*)?!;
if ($3) {$_host = $3;}
if ($4) {$_path = $4;}
$_ip = inet_aton($_host) || die "host($_host) not found.\n";
$_sockaddr = pack_sockaddr_in(80, $_ip);
socket(SOCKET, PF_INET, SOCK_STREAM, 0) || die "socket error.\n";
# ソケットの接続
connect(SOCKET, $_sockaddr) || die "connect $_host error.\n";
autoflush SOCKET (1);
# HTTP要求を送信
print SOCKET "GET $_path HTTP/1.1\n";
print SOCKET "Host: $_host\n";
print SOCKET "Connection: close\n\n";
# HTTP応答を受信
while (<SOCKET>) {
last if(/^\n$/);
}
}
312山崎 渉
03/07/15 11:07ID:???__∧＿∧_
|（ ＾＾ ）| ＜寝るぽ（＾＾）
|＼⌒⌒⌒＼
＼ |⌒⌒⌒~| 山崎渉
~￣￣￣￣
313山崎 渉
03/08/02 02:42ID:??? ∧＿∧
（ ＾＾ ）＜ ぬるぽ（＾＾）
（ ＾＾ ）＜ ぬるぽ（＾＾）
314ぼるじょあ ◆ySd1dMH5Gk
03/08/02 05:29ID:??? ∧＿∧ ∧＿∧
ﾋﾟｭ.ｰ （ ・３・） ( ＾＾ ） ＜これからも僕たちを応援して下さいね（＾＾）。
＝〔~∪￣￣￣∪￣￣〕
＝ ◎――――――◎ 山崎渉&ぼるじょあ
ﾋﾟｭ.ｰ （ ・３・） ( ＾＾ ） ＜これからも僕たちを応援して下さいね（＾＾）。
＝〔~∪￣￣￣∪￣￣〕
＝ ◎――――――◎ 山崎渉&ぼるじょあ
315nobodyさん
03/08/02 17:47ID:??? 次の00には何を作ってもらうかを考えよ〜
317山崎 渉
03/08/15 22:45ID:??? (⌒V⌒)
│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。
⊂| |つ
（＿）（＿） 山崎パン
│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。
⊂| |つ
（＿）（＿） 山崎パン
319!100
04/03/22 04:48ID:??? <title>２ちゃんねるルーレット</title>
<?php
$url = 'http://127.0.0.1/bbsmenu.html';
$sec = 5;
if ($lines = preg_grep("/^<A HREF=.+?>.+?<\/A>/", file($url))) {
srand();
print preg_replace(
"/^<A HREF=(.+?)>(.+?)<\/A>.*/",
"$sec 秒後に<a href=\"$1\">$2</a>へ移動<meta http-equiv=\"Refresh\" content=\"$sec;URL=$1\">",
$lines[array_rand($lines)]
);
}
?>
>>318 作ってやったから金払え
<?php
$url = 'http://127.0.0.1/bbsmenu.html';
$sec = 5;
if ($lines = preg_grep("/^<A HREF=.+?>.+?<\/A>/", file($url))) {
srand();
print preg_replace(
"/^<A HREF=(.+?)>(.+?)<\/A>.*/",
"$sec 秒後に<a href=\"$1\">$2</a>へ移動<meta http-equiv=\"Refresh\" content=\"$sec;URL=$1\">",
$lines[array_rand($lines)]
);
}
?>
>>318 作ってやったから金払え
320nobodyさん
04/06/18 10:15ID:??? while(1) {
print("ぬるぽ\n");
}
print("ぬるぽ\n");
}
レスを投稿する
ニュース
- イチロー氏、野球と比べてサッカーが「うらやましい」と語る 「チームのためにという感じが」「野球は個人で成績を出さないとボロカス」 [冬月記者★]
- 【サッカー】ブラジル戦、NHKは地上波なし 本田圭佑はBSで解説… 悲鳴続出「マジかよ」 地上波はフジテレビが生中継、解説は小野伸二 [冬月記者★]
- 【W杯】韓国が大窮地 悪夢のシナリオ止まらず 決勝Ｔ進出順位ボーダーの８位に転落 セネガル、イランに抜かれる ★5 [尺アジ★]
- 【自維】鮭おにぎり198円に絶望、コンビニすら遠い存在に…「生き延びられない」物価高で広がる生活苦★6 [ひぃぃ★]
- 【サッカー】W杯の「日本VSブラジル」を他で例えると…Xで問いかけ話題「湘北vs山王」「明徳義塾vs大阪桐蔭」「ドトウvsオペラオー」★2 [o(^・-・^)o★]
- 【サッカー】日本代表、ブラジル戦でアウェーユニホーム着用へ… FIFAが公式発表 爆売れの白デザイン、W杯で初お披露目！ [冬月記者★]
- 公正取引委員会さん、生成AIでクリエイターの皆様へ向けてポスターを作ってしまうwwwwwwwwwwwwwwwwww
- 経団連「年内には訪中して習主席と面会したい😢レアアースもタングステンももう限界😢」 ★2 [904151406]
- jkとセックス出来るならしたいプレイ
- 昭和生まれしか知らない事
- 安倍陽水「夏になり腹下し♪下痢止めを探し♪彷徨う～♪」 [279951338]
- 【高市悲報】今国会の全法案が廃案へ。。。飲みィのヤリィのしてきた結果がこれなのか・・・ [252835186]