GAMEいいねー
RPGがいいなー
*99の指定したCGIを*00が作るスレ
90nobodyさん
02/12/09 23:05ID:???92nobodyさん
02/12/09 23:45ID:??? じゃぁどんなのがいい?
93nobodyさん
02/12/09 23:51ID:??? ↓こんなのとかどう?
94ハニホ・ヘニハ
02/12/09 23:56ID:??? おっ、ひとっ風呂あびてるあいだにこんなに成長しやがって〜!
95nobodyさん
02/12/10 00:14ID:??? 微妙
96nobodyさん
02/12/10 00:17ID:??? ビクビク
97nobodyさん
02/12/10 00:17ID:??? 最初はすごく簡単なのがいいかな。
だんだん難しくなる方向で。
1アクセスするごとに、10カウンタが増えるカウンタとか。
だんだん難しくなる方向で。
1アクセスするごとに、10カウンタが増えるカウンタとか。
98nobodyさん
02/12/10 00:18ID:??? ビクビク
99nobodyさん
02/12/10 00:33ID:??? ページにいくごとに、2chのどれかの板にランダムに飛ぶ
「2ちゃんねるルーレット」
「2ちゃんねるルーレット」
100nobodyさん
02/12/10 00:36ID:??? ほほう
101nobodyさん
02/12/10 00:42ID:??? 既にあった気はしますが。
105nobodyさん
02/12/10 01:09ID:??? じゃあ、マターリと199までがんばろう
100が早く作ってくれてソースを公開してくれたら
それを肴に伸びるかもしれない。
100が早く作ってくれてソースを公開してくれたら
それを肴に伸びるかもしれない。
106nobodyさん
02/12/10 01:53ID:??? 2chルーレット〜プログラム板〜
http://pc3.2ch.net/test/read.cgi/tech/1031427459/
すでに・・・・・・・・・・・・・
いや、上のスレの事は忘れてくれ。
http://pc3.2ch.net/test/read.cgi/tech/1031427459/
すでに・・・・・・・・・・・・・
いや、上のスレの事は忘れてくれ。
107nobodyさん
02/12/10 04:36ID:??? 300以上ある板のアドレスを書くのが面倒かも・・・・
左のメニューを加工すればいいか?
あ、全ての板が対象でなくてもいいのか。
左のメニューを加工すればいいか?
あ、全ての板が対象でなくてもいいのか。
108nobodyさん
02/12/10 11:38ID:??? かちゅ用の2channel.brdを読み込んで加工するようにすれば鯖移転にも自動的に対応できる。
109nobodyさん
02/12/10 12:46ID:??? いや、、再開発するつもり?> 107-108
110nobodyさん
02/12/10 15:15ID:??? >>107
暇なら書いてもいいけど・・・
from urllib import urlopen
import re
BBSMENU_URL = "http://2ch.net/bbsmenu.html"
CATEGORY = re.compile("<B>(.+)</B>")
BOARD = re.compile("HREF=http\:\/\/([^/]+)\/([^/]+)/.*>(.+)<\/A>")
BR = re.compile("<br>", re.IGNORECASE)
temp = urlopen(BBSMENU_URL).read()
c = None
for line in BR.split(temp):
m = CATEGORY.search(line)
if m is not None:
c = m.group(1)
print c
continue
if c is None: continue
m = BOARD.search(line)
if m is not None:
host = m.group(1)
board = m.group(2)
title = m.group(3)
print "\t%s\t%s\t%s" % (host, board, title)
暇なら書いてもいいけど・・・
from urllib import urlopen
import re
BBSMENU_URL = "http://2ch.net/bbsmenu.html"
CATEGORY = re.compile("<B>(.+)</B>")
BOARD = re.compile("HREF=http\:\/\/([^/]+)\/([^/]+)/.*>(.+)<\/A>")
BR = re.compile("<br>", re.IGNORECASE)
temp = urlopen(BBSMENU_URL).read()
c = None
for line in BR.split(temp):
m = CATEGORY.search(line)
if m is not None:
c = m.group(1)
print c
continue
if c is None: continue
m = BOARD.search(line)
if m is not None:
host = m.group(1)
board = m.group(2)
title = m.group(3)
print "\t%s\t%s\t%s" % (host, board, title)
111nobodyさん
02/12/11 15:00ID:EKm4hoHt115nobodyさん
02/12/11 23:14ID:??? >>!14
正解。
板を変更することは、それ程頻繁にないと思うけど
スレッドは・・・、新しいスレが建った場合はどうするんだろう?
毎回一覧読みに行く?
正解。
板を変更することは、それ程頻繁にないと思うけど
スレッドは・・・、新しいスレが建った場合はどうするんだろう?
毎回一覧読みに行く?
116nobodyさん
02/12/11 23:34ID:??? ___
/ \
/ ∧ ∧ \ / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
| ・ ・ | < >>100まだできないのか?
| )●( | \__________
\ ー ノ
\____/
/ \
/ ∧ ∧ \ / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
| ・ ・ | < >>100まだできないのか?
| )●( | \__________
\ ー ノ
\____/
117nobodyさん
02/12/12 02:29ID:??? なんだよ、このスレ企画倒れかよ。
さすがWebProg板だな。
さすがWebProg板だな。
118nobodyさん
02/12/12 03:45ID:??? ^[1-9]*99の指定したCGIを^[1-9][0-9]*が作るスレ
119nobodyさん
02/12/12 11:43ID:??? age
120nobodyさん
02/12/12 12:11ID:??? ^.?99$のしてーしたCGIを^.00$が作らされるスレ
121100じゃないが
02/12/12 16:19ID:??? >>115
それ、俺も考えた。
板メニューは多くても一日一回程度でいいけど、
スレ一覧は速いところだと、一時間もすれば様変わりするからな。
かといって、恐ろしく頻繁にアクセスがある場合などは、
スレ一覧もある程度保存しておいた方がいいのかな・・・。
逆に時々しかアクセスされないなら、
いちいち読みに逝くことを前提にした方がいい。
それ、俺も考えた。
板メニューは多くても一日一回程度でいいけど、
スレ一覧は速いところだと、一時間もすれば様変わりするからな。
かといって、恐ろしく頻繁にアクセスがある場合などは、
スレ一覧もある程度保存しておいた方がいいのかな・・・。
逆に時々しかアクセスされないなら、
いちいち読みに逝くことを前提にした方がいい。
122nobodyさん
02/12/12 20:52ID:Yvpo7hAc そもそも既にできているモノを作っても意味ないような
自動で煽れるcgiとか作ってくれ
自動で煽れるcgiとか作ってくれ
125nobodyさん
02/12/12 23:19ID:???126nobodyさん
02/12/13 00:45ID:???127nobodyさん
02/12/13 06:57ID:??? 最近ですね
128nobodyさん
02/12/13 06:57ID:??? 疑問なんですが
129nobodyさん
02/12/13 06:58ID:??? ドクターペッパーとコーラは
130nobodyさん
02/12/13 06:58ID:??? どっちがうまいですかね
131nobodyさん
02/12/13 06:58ID:??? 俺が思うに
132nobodyさん
02/12/13 06:58ID:??? どうもドクターペッパーのほうが飽きないんではないかと
133nobodyさん
02/12/13 06:58ID:??? なぜかっていうと
134nobodyさん
02/12/13 06:59ID:??? 美人は
135nobodyさん
02/12/13 06:59ID:??? 三日で飽きる
136nobodyさん
02/12/13 06:59ID:??? ブスは
137nobodyさん
02/12/13 06:59ID:??? あきねーでしょ、これが
138nobodyさん
02/12/13 06:59ID:??? ドクターペッパー飲むたびに
139nobodyさん
02/12/13 06:59ID:??? 「うぼっ」って思うこと間違いなしっすよ
140nobodyさん
02/12/13 07:00ID:??? でもね
141nobodyさん
02/12/13 07:00ID:??? 実際俺はうまいとおもうんだけど
142nobodyさん
02/12/13 07:00ID:??? 名前が悪いと思うんだ
143nobodyさん
02/12/13 07:00ID:??? 「ペッパー」て
144nobodyさん
02/12/13 07:01ID:??? なんかこう、胡椒を連想しません?
145nobodyさん
02/12/13 07:01ID:??? ジンジャーやコカは、さほど知られてないがゆえ
146nobodyさん
02/12/13 07:01ID:??? モーマンタイでしょうけど
147nobodyさん
02/12/13 07:01ID:??? ペッパーて
148nobodyさん
02/12/13 07:02ID:??? 初心者買うのためらうわ
149nobodyさん
02/12/13 07:02ID:??? 俺もためらったもん
150nobodyさん
02/12/13 07:02ID:??? 「飲んでみたい」より
151nobodyさん
02/12/13 07:02ID:??? 「飲めなかったらどうしよう」のほうが強かったね
152nobodyさん
02/12/13 07:03ID:??? で、捨て銭だと思いこんで買ったんですよ、深夜
153nobodyさん
02/12/13 07:03ID:???うまかった
154nobodyさん
02/12/13 07:03ID:??? あれ、コーラよりうまいじゃん。て。
155nobodyさん
02/12/13 07:03ID:??? 冷たさと、あっさりテイストがマッチ
156nobodyさん
02/12/13 07:04ID:??? どこに薬品臭が?ってね
157nobodyさん
02/12/13 07:04ID:??? 「似てる」って一時言われて
158nobodyさん
02/12/13 07:04ID:??? 一時流行った
159nobodyさん
02/12/13 07:04ID:??? 「SMAP」(飲料)
160nobodyさん
02/12/13 07:05ID:??? あれは
161nobodyさん
02/12/13 07:05ID:??? 毒
162nobodyさん
02/12/13 07:05ID:??? やばいと思った
163nobodyさん
02/12/13 07:06ID:??? 初めて家族で行ったキャンプ場の電灯が1つだけついてる便所
164nobodyさん
02/12/13 07:06ID:??? なまじ明かりがついてるもんだから
165nobodyさん
02/12/13 07:06ID:??? 壁がね
166nobodyさん
02/12/13 07:06ID:??? 蛾蛾蛾SP
167nobodyさん
02/12/13 07:07ID:??? あれも、やばいと思った
168nobodyさん
02/12/13 07:07ID:??? そんぐらい。SMAP。
169nobodyさん
02/12/13 07:07ID:??? よく発売したなあと
170nobodyさん
02/12/13 07:07ID:??? 朝のワイドショーにSMAPのVTRが流れて
171nobodyさん
02/12/13 07:08ID:??? 他のメンバー「うまい」とか「新しい味」とか言ってたのに
172nobodyさん
02/12/13 07:08ID:??? 木村「
173nobodyさん
02/12/13 07:08ID:??? 飲んだ後に…
174nobodyさん
02/12/13 07:08ID:??? ・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・
175nobodyさん
02/12/13 07:08ID:??? ん?(微笑」
176nobodyさん
02/12/13 07:09ID:??? だもん
177nobodyさん
02/12/13 07:09ID:??? 他のメンバー「だまるくらいうまい、と」とかフォローしてるし
178nobodyさん
02/12/13 07:09ID:??? 正直者をよってたかって隠蔽か
179nobodyさん
02/12/13 07:09ID:??? 黒い、黒いよ
180nobodyさん
02/12/13 07:10ID:??? 蛾蛾蛾SP
181nobodyさん
02/12/13 07:10ID:??? まぁそんなこんなで
182nobodyさん
02/12/13 07:10ID:??? ファンタ愛飲者には怒られそうですが
183nobodyさん
02/12/13 07:10ID:??? 一応やっとく・・・?
184nobodyさん
02/12/13 07:10ID:??? ファンタね。偽者くさい。
185nobodyさん
02/12/13 07:11ID:??? 10%オレンジジュースみたい。まずいでしょ、100%に比べると
186nobodyさん
02/12/13 07:11ID:??? 桃味って2000年限定だと思ってたのに
187nobodyさん
02/12/13 07:12ID:??? ホワイトピーチが普通に発売されてる現実
188nobodyさん
02/12/13 07:12ID:??? クレームはどこにつけりゃいいの!?
189nobodyさん
02/12/13 07:12ID:??? コカコーラ社です。
190nobodyさん
02/12/13 07:13ID:??? やっぱだめだ、コーラ。ドクペ再来の季節。
191nobodyさん
02/12/13 07:14ID:??? さて、別に俺は荒らしでもなんでもなく、>>100が創ってくれるのを待ってるんだが、同時進行でスレ活性。うっほい。あ、このスレだけ「作る」を「創る」にしない?
192nobodyさん
02/12/13 07:16ID:??? ドクターペッパーの由来は、ペッパー医師の娘に惚れていたが父親に認められなくて結婚を断念した青年が創った飲料で
それにドクターペッパーって名前つけたら医師も許してくれたんだって
それにドクターペッパーって名前つけたら医師も許してくれたんだって
193nobodyさん
02/12/13 07:16ID:??? なんのこっちゃだね。このスレ住人は怒るかな?青年。違う、俺のことを
194nobodyさん
02/12/13 07:17ID:??? 今宵もcgiを創りながら
195nobodyさん
02/12/13 07:17ID:??? 缶を傾ける・・・ fin
197nobodyさん
02/12/13 08:46ID:IN4gWS6o エクスプローラに激似の、アップローダ兼ファイル管理CGI
199199
02/12/13 09:09ID:??? 199
200200
02/12/13 09:10ID:??? 200
202nobodyさん
02/12/13 09:16ID:???203nobodyさん
02/12/13 09:52ID:??? 擦れたいから想像するに後方参照して(それに100足して)いるわけじゃないし
199が指定したものを200が作る必要ないのでは?とひねくれてみる
199が指定したものを200が作る必要ないのでは?とひねくれてみる
204nobodyさん
02/12/13 13:18ID:PrrV69nn 199なCGIってどんなだろう?
206100
02/12/13 14:15ID:??? 呼んだか?
207nobodyさん
02/12/13 14:26ID:1ejr4/26 つかえねー>>100だな
209nobodyさん
02/12/13 16:07ID:??? #!/usr/bin/perl
print "Content-type: text/plain\n\n";
print "199";
print "Content-type: text/plain\n\n";
print "199";
212nobodyさん
02/12/13 22:51ID:???213nobodyさん
02/12/14 08:08ID:??? > 「エクスプローラに激似の、アップローダ兼ファイル管理CGI 」
CGI版 WebDAV(or FTP) Client ?
CGI版 WebDAV(or FTP) Client ?
215nobodyさん
02/12/14 22:29ID:/7Ilx+P7 >>200
賃貸マンション住まいでしょ?
賃貸マンション住まいでしょ?
216nobodyさん
02/12/15 04:40ID:??? 次の\d99まで暇だから、
\d00が指定されたCGIの製作過程を残す、というのはどう?
言語選択 - PHP #
板一覧の所得 ...
スレッド一覧の所得 ...
乱数の生成 ... int rand(min, max)
と、もうちょっと生産的な方向に流れを変えて見よう
\d00が指定されたCGIの製作過程を残す、というのはどう?
言語選択 - PHP #
板一覧の所得 ...
スレッド一覧の所得 ...
乱数の生成 ... int rand(min, max)
と、もうちょっと生産的な方向に流れを変えて見よう
217nobodyさん
02/12/15 04:43ID:FL3a4bzG まだ書いてる途中だったのに送信してしまった・・・
まぁ、いぃや。
まぁ、いぃや。
218nobodyさん
02/12/15 04:46ID:FL3a4bzG 216-217 の書きこみの間でbbs.cgi変わった?
書き込み前に確認画面出るようになったよ。
書き込み前に確認画面出るようになったよ。
219nobodyさん
02/12/15 05:03ID:???221nobodyさん
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:??? 無能な100がいるスレはここでつか?
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
300300か301
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:??? ∧_∧ ∧_∧
ピュ.ー ( ・3・) ( ^^ ) <これからも僕たちを応援して下さいね(^^)。
=〔~∪ ̄ ̄ ̄∪ ̄ ̄〕
= ◎――――――◎ 山崎渉&ぼるじょあ
ピュ.ー ( ・3・) ( ^^ ) <これからも僕たちを応援して下さいね(^^)。
=〔~∪ ̄ ̄ ̄∪ ̄ ̄〕
= ◎――――――◎ 山崎渉&ぼるじょあ
315nobodyさん
03/08/02 17:47ID:??? 次の00には何を作ってもらうかを考えよ〜
317山崎 渉
03/08/15 22:45ID:??? (⌒V⌒)
│ ^ ^ │<これからも僕を応援して下さいね(^^)。
⊂| |つ
(_)(_) 山崎パン
│ ^ ^ │<これからも僕を応援して下さいね(^^)。
⊂| |つ
(_)(_) 山崎パン
319!100
04/03/22 04:48ID:??? <title>2ちゃんねるルーレット</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");
}
321nobodyさん
04/12/18 17:51:09ID:neHl2NC1 age
322nobodyさん
2008/11/07(金) 14:31:55ID:YMX4hGRf ageeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
323nobodyさん
2008/12/23(火) 14:29:41ID:IREBlBH+ age
325nobodyさん
2013/03/27(水) 19:39:59.35ID:IuHY8fTv _
|O\
| \ キリキリ
∧|∧ \ キリキリ
ググゥ>(;⌒ヽ \
∪ | (~)
∪∪ γ´⌒`ヽ
) ) {i:i:i:i:i:i:i:i:}
( ( ( ´・ω・)、
(O ⌒ )O
⊂_)∪
|O\
| \ キリキリ
∧|∧ \ キリキリ
ググゥ>(;⌒ヽ \
∪ | (~)
∪∪ γ´⌒`ヽ
) ) {i:i:i:i:i:i:i:i:}
( ( ( ´・ω・)、
(O ⌒ )O
⊂_)∪
326nobodyさん
2017/12/30(土) 13:00:29.15ID:YhlYw6jg 誰でも簡単にネットで稼げる方法など
参考までに、
⇒ 『半藤のブブイウイウレレ』 というサイトで見ることができます。
グーグル検索⇒『半藤のブブイウイウレレ』
9R1ADQXKGO
参考までに、
⇒ 『半藤のブブイウイウレレ』 というサイトで見ることができます。
グーグル検索⇒『半藤のブブイウイウレレ』
9R1ADQXKGO
327nobodyさん
2023/10/15(日) 04:32:20.79ID:??? もっと君のかわいい声ききたいな…ほら、その手どけてよ…もっと聞かせて…
レスを投稿する
ニュース
- イチロー氏、野球と比べてサッカーが「うらやましい」と語る 「チームのためにという感じが」「野球は個人で成績を出さないとボロカス」 [冬月記者★]
- 【サッカー】ブラジル戦、NHKは地上波なし 本田圭佑はBSで解説… 悲鳴続出「マジかよ」 地上波はフジテレビが生中継、解説は小野伸二 [冬月記者★]
- 【W杯】韓国が大窮地 悪夢のシナリオ止まらず 決勝T進出順位ボーダーの8位に転落 セネガル、イランに抜かれる ★5 [尺アジ★]
- 【自維】鮭おにぎり198円に絶望、コンビニすら遠い存在に…「生き延びられない」物価高で広がる生活苦★6 [ひぃぃ★]
- 【サッカー】W杯の「日本VSブラジル」を他で例えると…Xで問いかけ話題「湘北vs山王」「明徳義塾vs大阪桐蔭」「ドトウvsオペラオー」★2 [o(^・-・^)o★]
- 【サッカー】日本代表、ブラジル戦でアウェーユニホーム着用へ… FIFAが公式発表 爆売れの白デザイン、W杯で初お披露目! [冬月記者★]
- 石破がアメリカに投資した80兆円って返ってくるの? [126644339]
- 経団連「年内には訪中して習主席と面会したい😢レアアースもタングステンももう限界😢」 ★2 [904151406]
- マジな話、リアル5等分の花嫁って気持ち悪いだろうな
- 安倍晋三「らめぇ!お尻がオマンコになっちゃう…!❤」 [279951338]
- 【高市悲報】今国会の全法案が廃案へ。。。飲みィのヤリィのしてきた結果がこれなのか・・・ [252835186]
- お台場、次々閉館してただの廃墟と化してしまう [709039863]