【CGI】合同開発室

1 名前：当方へたれですが [01/10/02 00:35 ID:GsMMcvtM] 合同で学習用スクリプトとかの開発をできないかと思って iswebだけどアプロダ置いてみました。 isweb36.infoseek.co.jp/computer/perldev/ 参加してくれる人キボン 2 名前：当方へたれですが [01/10/02 00:35 ID:GsMMcvtM] もちろん私もなるたけ参加します。 私はちまちまサブルーチンやアプロダをやる予定。 チャットとかもやってみたいけど設計はとくにへたれだからなぁ。 3 名前：100% mailto:sage [01/10/02 00:38 ID:???] 空中分解するでしょう　　ｗ 4 名前：当方へたれですが mailto:sage [01/10/02 00:42 ID:???] >>3 掲示板改造するって人らが来てくれるかなぁとか思ってるんですが うう，やっぱそうですかね。 5 名前：100% mailto:sage [01/10/02 00:50 ID:???] つかここ人少ないからねー　ヽ(´ー｀)ノ でもPG板でソースアプ板無いのも何かと不便だから 「ソースなら良いですよ」ってスタイルならポインタ示したい 時なんかに便利じゃないかな、それで副産物的にテクニックが学べると いいね　お互い 6 名前：当方へたれですが mailto:sage [01/10/02 01:04 ID:???] >>5 exeやrmとか置かれるとさすがに困るけど， Cとかのソースなら範囲内と思てます。 アプロダはざっとしかソース見てないんでちょと不安。 はやく把握したいけど私にはむつかしい・・・ 7 名前：当方へたれですが [01/10/02 01:20 ID:GsMMcvtM] Network.plを上げてみた。 8 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/02 01:44 ID:???] またいきなり厨房臭いところから攻めてきたね　　：-） まあ方向的には良さそうだが・・・ 9 名前：名無しさん [01/10/02 08:30 ID:6SpiWnfc] ここの掲示板をつくろうスレって結局完成したんだっけ？ 10 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/02 09:41 ID:???] 何人か作ったと思うけど、共同では完成してないよ。 もっとも、あのスレは共同開発の雰囲気でもないよね。 11 名前：当方へたれですが mailto:sage [01/10/02 22:51 ID:???] CGI.plアプ。 クッキー読み書き，フォームデコード。 今回，POST・GETの切り分け，自動判別や，GETのみ取得，ファイルアップロード対応，とかは保留。 アプロダはテンポラリファイル削除でエラー出てるのをなんとかしたい。 上のを実装したらアプロダ作りに挑戦する予定。 12 名前：当方へたれですが [01/10/04 00:42 ID:/0/769eo] へたれっぷりを再認識しつつCGI.plのフォームデコード部分をアプしてみました。 メソッド判別して，POST・GETそれぞれのデコード関数に振り分けるように。 次はファイルアップロードのを予定。 あそこに上げたのはいじられる覚悟の上ですんで， 修正や添削してもらえるとありがたいです。 いじられるのに同意してくれて俺の関数もどうよ？ って人が何人かいると共同開発の雰囲気になるかなぁ。 13 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/04 00:56 ID:???] マルチパートを綺麗にデコードしてくれー　　(笑 14 名前：当方へたれ mailto:sage [01/10/04 01:48 ID:???] multipart/form-dataのフォーマットがわからなかったので そのままGETみたくデコードしてました。 とほほとかで調べてみます。 ちんたら調べてる間に添削されたのがアプされてたりなんかすると， オープンソース開発ぽいかも。 15 名前：名無しさん＠お腹いっぱい。 [01/10/04 03:39 ID:f6uUGLLk] CGI.pmじゃだめなの？ 16 名前：当方へたれですが mailto:sage [01/10/04 03:51 ID:???] マルチパートデコード調べてみました。 残念ながら実力不足で実装までいけそうにないです。 >15 学習用にと思いまして。 17 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/04 04:17 ID:???] > ちんたら調べてる間に添削されたのがアプされてたりなんかすると， >オープンソース開発ぽいかも。 申し訳無いが、今の所「いまさらそれ？」的なものだけなのでね。 CGI.plにしても15の言うとおり、CGI.pmがあるわけだし。 まぁ頑張って下さい（スレと関係無いのでサゲ 18 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/04 06:14 ID:???] 　遠慮なく人のソースいじるってのは他のとこだとできないんで， ここがそうなればなぁと思ってましたが，私じゃ力不足だったようです。 　だれかが作ってくれないかなぁと思って待ってても できなかったので，自分がアプロダ置きました。 　何も無いところにアプする人がいるとも思えなかったので， 自分が書いたのを上げました。 　ランダムアクセスとか，超高速日本語コード変換とか， すごい人の 役にたてるのを作れるほどの実力があるとは思えないので， 自分くらいのレベル向けにいろんなののをメモしとこうと 書いてました。 　人が来るようになったら誰かにアカウント移そうと思ってましたが，杞憂でしたね。 19 名前：当方へたれ=18 mailto:sage [01/10/04 06:19 ID:???] というかこれは「合同開発室」じゃなくて 「私のプログラムを添削してください」ですね。 20 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/04 06:40 ID:???] この板住人の数が少ないからねー。もすこし待っててみ。 ２週間ぐらいスレが生き延びれば定着するよ。 そのためにはネタを出し惜しみして、 ヘッドラインから消えたらageるぐらいでちょうどいい。 21 名前：20 mailto:sage [01/10/04 06:50 ID:???] ＞ヘッドラインから消えたらageるぐらいでちょうどいい。 う。全然ちょうどよくねえ！ よく見たら最終書き込み９月２５日の雑談スレが まだヘッドラインに残ってるじゃねーかよ！ この板の回転の遅さを甘く見ていた。 あらためて寂寞を感じる今日このごろ。。。 22 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/04 07:29 ID:???] 一応自作Scriptを書くらいは何とかなるんですが、人様に教える程 には知らない事が多すぎる自分。 multipart/form-data は、先日(勉強も兼ね)自前で実装させたん ですがRFCやらCGI.pmやら見てかなり泥縄でやったので見せるほどの 物でも無し…(ブラウザごとの実装の違いの可能性はほぼ気に しなかったし…)。 とは言うものの、スレの趣旨は悪くないので出来たら応援したいっす。 >>21 でも不思議な事に糞スレやら糞カキコは後を絶えないんですよね…。 23 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/05 04:53 ID:???] >>1 似たようなスレの末路 ebi.2ch.net/test/read.cgi/php/1001318195/ 24 名前：当方へたれですが [01/10/05 23:52 ID:1j62Ctwg] CのをまねしてAssert.pl作ってみました。 条件式と変数のリファレンスを渡すと，条件が偽の時STDERRに 条件式と，パッケージ・ファイル・行，変数の内容を吐きます。 たぶん今回も車輪の再開発です。 25 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/06 04:28 ID:???] CGI.plを勉強用で片付けないで、CGI.pmを超えるものを作ればいいじゃん。 というわけで、CGI.pmの問題点とか挙げていこーよ。 とりあえず、h1とかHTML生成用のメソッドと、paramとかを分離してくれ。 #HTML::Templateを主に使っているので、h1とかいらないんだよね〜。 26 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/06 07:06 ID:???] >>24 ファイル名をAssert.pmにして、assertって関数名を mainパッケージにエクスポートすると使いやすくない？ 正式にExporterのサブクラスにするとかの おおげさなことじゃなくて、どっかに１行 *main::assert = \&assert; を入れてmainからアクセスできるだけでもいいと思うんだけど。 こんなふうに、必要なとこでrequireして使う感じ ： require Perldev::Assert; $_ = 'AAA'; my $hoge = 'BBB'; assert( q[$_ eq ""], (\$_, \$hoge) ); ： 27 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/06 12:02 ID:???] 遅くなるだけで無意味だけどBoolean.pm 28 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/06 12:07 ID:???] つーか.plと.pmの拡張子は認めてくれよ。 29 名前：名無しさん＠お腹いっぱい。 [01/10/06 13:01 ID:0fYRCZ0M] >>25 use CGI qw(:cgi); でいいかと。 30 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/06 13:04 ID:???] >>27 もらったよ。use overloadの勉強用に。 31 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/06 14:08 ID:???] >>28 だから全部".txt"だったのかよ！ 32 名前：当方へたれですが mailto:sage [01/10/06 17:03 ID:???] アプロダの設定変えました。 たぶんこれで.plと.pm置けるようになったはず。 Boolean.pm見て勉強してきます。 33 名前：名無しさん＠お腹いっぱい。 [01/10/07 00:37 ID:rgyPDIMY] ドキュメントをpodで埋め込まないなんてナンセンスだよ。 34 名前：27 mailto:sage [01/10/07 10:38 ID:???] >>33 ごもっとも。自分でもそう思った。 学習用のなんだから面倒くさがらずにやりゃよかったな。 35 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/07 13:50 ID:???] おい、行けなくなってるぞ。 36 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/07 21:03 ID:???] 突然動かなくなったのでいろいろいじってみましたが治せませんでした。 サポート掲示板によると，isweb36サーバーの一部が落ちてるみたいです。 37 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/11 00:56 ID:???] サーバー復帰したみたいです。 ついでに画像閲覧とかFTPとかの使わなそうな機能を削りました。 38 名前：hage mailto:moge [01/10/15 07:49 ID:???] age 39 名前：1 [01/10/16 03:42 ID:TCS0inSE] 低機能アップローダあげました。 このペースだと来年すぎまでかかりそうなので， 今回は自分でフォームデコードはせずに，CGIとFile::Copy使ってます。 content-typeだけでファイルタイプを判定してるので， plやpmはtxtになっちゃいます。 CGI.pm使ってHTMLを書いたけど，使いづらいしソースも見づらいので こういうのに便利らしいHTML::Templateを調べてきます。 40 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/16 07:33 ID:???] 何か知らんけど頑張れ！　　（・∀・） 41 名前：ちんげん [01/10/16 19:55 ID:5A+7lSiO] ヘタレながら参戦。 「CGI」の「テキスト」カウンターできたよ〜。 42 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/16 20:32 ID:???] >>41 @file = <IO>; foreach (@file){ } より while(<IO>){ } の方が良いと思われ。 43 名前：ちんげん mailto:sage [01/10/16 21:11 ID:???] ヘタレにつき、詳細キボンヌ。スマソ。 44 名前：!42 mailto:sage [01/10/16 21:44 ID:???] いちいち@fileに入れずに、while(<IO>)で一行ずつ処理する方が、 サーバーにも優しいカウンターになる、という意味だと思われ。 45 名前：!44 mailto:sage [01/10/16 21:56 ID:???] あれ位のHTMLなら気にする事も無いのかもだけどね 例えばトップが50KBのhtmlとかだと50KBの配列が出来ちゃう と言うかテキストカウンターっぽい事をしたいなら 読み書きモードでopenして、カウンターの位置までseekしてprint した方が良いよ。ヘッダなんかを書き換えた時はメンテする必要が 有るけどね。 46 名前：名無しさん＠お腹いっぱい。 [01/10/16 21:57 ID:/3a8HFEe] >>24 うん、Perl5に標準添付されているライブラリ assert.pl があるよ。 # Usage: # # &assert('@x > @y'); # &assert('$var > 10', $var, $othervar, @various_info); # # That is, if the first expression evals false, we blow up. The # rest of the args, if any, are nice to know because they will # be printed out by &panic, which is just the stack-backtrace # routine shamelessly borrowed from the perl debugger. 47 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/17 00:23 ID:???] >41 ロックのところは open or die "Error:$!" みたいに if ! 使わずに or 使ったり $! も表示したりしたほうがいいと思う。 48 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/17 04:46 ID:???] >40 ありがとう。ちまちまやってきます。 >41 参戦感謝。 >46 情報感謝。 　CPAN繋がらなかったんで検索しなかったんですが，標準で付いてましたか。 　標準添付のを見てみたら，以外とライブラリもあるんですね。初めて知りました。 -- HTML::Template調べたところ，以外と簡単そうです。 今日は試しにアプロダの，テンプレだけを書いてみました。 49 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/17 08:37 ID:???] > my ($i, $count) = (0,0); > foreach (@source){ > if ($source[$i] =~ /<!--count-->([\d]+)<!--\/count-->/ig) { > $count = $1; > $count++; > $source[$i] =~ s/<!--count-->[\d]+<!--\/count-->/<!--count-->$count<!--\/count-->/ig; > } > $i++; > } こんなわけのわからない処理は止めなさい。 foreachの使い方がわかってない。 あと、変換はs///eg一発で出来るよ。 もっと言うと、テンポラリファイルに書き出してからrenameしたほうがいい。 openの戻り値はきちんとチェックしようね。 &lock_file; open SRC "$source" or die; open TMP "> $tmp" or die; while (<SRC>) { s///eg; print TMP $_; } close SRC; close TMP; rename($tmp, $source); &unlock_file; こんな流れで。 50 名前：ちんげん mailto:sage [01/10/17 09:12 ID:???] >>44 >>45 どうも、ありがとうです。 一回の読み書きOPENで書き換えするのに、seekでカウンター値の先頭への ポインタを得る方法を考えていたら頭から煙が出てきました。 # なんか見当はずれなことしてんのかなぁ。 >>49 > こんなわけのわからない処理は止めなさい。 厨スクリプトでお目汚しスマソ。 > あと、変換はs///eg一発で出来るよ。 s///egってのがあるんで？勉強してきます。 > もっと言うと、テンポラリファイルに書き出してからrenameしたほうがいい。 そか、一旦、テンポラリに書き出してそれからリネームすればいいのか。 それで昨晩ずーっと悩んでました。 > openの戻り値はきちんとチェックしようね。 Σ（；´Д｀） あっ、ホントだ。してなかった。鬱だ。 大変参考になりました。ありがとうございました。勉強になります。 出直して参ります。 51 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/18 02:40 ID:???] Caller.pm上げてみた。 my $cl = new Caller; print $cl->line; use Caller qw(caller) でオーバーライドも。 52 名前：1 mailto:sage [01/10/18 04:29 ID:???] >51 勉強用にいただきました。じっくり読めばなんとか理解できそうです。 39：*pkg = \&pakcage; typoぽいです。 -- すごいなー私も頑張ろう！とあぷろだ上げました。 変更点は，昨日のテンプレ修正と，ファイル名変更，表示部にテンプレ導入，他に少しです。 53 名前：名無しさん＠お腹いっぱい。 mailto:０ [01/10/18 22:27 ID:???] >>45 こうすればメンテ不用になるぞ、っと。 while (<HTM>){     if (/<!--count-->(\d+)<!--\/count-->/){         seek HTM,-length,1;      #書き換え         last;     } } でも�dだ時HTMLごと逝っちゃうのはイヤな感じかも　　（ｗ 54 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/18 22:55 ID:???] > seek HTM,-length,1 これなに？ 55 名前：名無しさん＠お腹いっぱい。 mailto:age [01/10/18 23:02 ID:???] >>50 s///eg のeオプションはいらないだろう。 56 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/18 23:07 ID:???] >>55 たとえば、 s/(\d+)(?=<!--\/count-->)/$1+1/eg とか。 57 名前：名無しさん＠お腹いっぱい。 mailto:age [01/10/18 23:27 ID:???] >>56 いやだから、上記の例では必要ないだろうと言っているの。 58 名前：45 mailto:sage [01/10/18 23:30 ID:???] >53 おー　さんちぇ! そっかバックすれば良いんだネ、うちはカウンターまで4行しかないから ｲｲ（・∀・）感じになったヨ :でも�dだ時HTMLごと逝っちゃうのはイヤな感じかも　　（ｗ うちは閑古Webだからネ、一応ロックバリバリにしてるけど今の所大丈夫みたい 200hit/DAYって感じだからかナ >54 seek HTM,-length($_),1だヨ 59 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/18 23:32 ID:???] >>50 に書いてある流れで、 s/// だけでカウンタインクリメント出来ると？ 60 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/19 06:41 ID:???] 55は49を読んでないツッコミ症候群だと思われ、、、 61 名前：1 [01/10/19 06:46 ID:UfCiRs0I] あぷろだv0.1.0上げました。 投稿削除ができるようになりました。 変更点は，ログフォーマット，delete.pl・delsetup.tmpl導入，他少し。 ログフォーマットも大体固まったので明日あたりにiswebにサンプル置きます。 -- >45 >>58 HTML書き出し式カウンタを使ってるんですか？ 実際に使うには，普通の，カウントを別ファイルに持つ形式より 危険な感じがするんですが，利点とかてありますか？ 煽りとかじゃなくて，純粋に気になったので。 62 名前：61 mailto:sage [01/10/19 07:04 ID:???] >>61 SSI使えないサーバでも使える。ってのがたぶん利点。 それ以外では使う理由ない。 あ、あとはカウンタ表示自体ではCGI起動しないってのもかな。 63 名前：62 mailto:sage [01/10/19 07:15 ID:???] あれ、すみません、俺は61じゃない。 64 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/19 07:34 ID:???] >>62 このカウンタって ・htmlにアクセス・表示 ・IMG経由でCGI呼び出し ・htmlを解析してカウンタ部分を加算 ・html書き出し という方法ですよね？ これだと以下みたいなのと比べると， 毎回htmlを書き出すんで負荷やあぼーん率が高くなりそうと思って。 ・cgiにアクセス ・index.tmpl読み込み ・count.dat読み込み ・カウント ・index.tmplの特種タグ（0<!-- __%%COUT%%__ -->とか）置き換え ・count.dat書き出し ・print うー，ちょっと混乱してます・・・ 65 名前：名無しさん＠お腹いっぱい。 mailto:（・∀・）ｱﾋｬｰ　ｺﾚﾂｯｺﾐﾄﾞｺﾛﾏﾝｻｲｼﾞｬﾈｰｶ？　2ﾁｬﾝﾈﾗｺｴeeee!!!　ﾔﾒﾃｴ!!! [01/10/19 10:54 ID:???] えっと、 index.htmlのimgタグ(ボクはiframe)でcount.cgiをキック index.htmlをopen (+<モード) 特種タグ（0<!-- __%%COUT%%__ -->とか）までseekでジャンプ 特種タグ（0<!-- __%%COUT%%__ -->とか）だけ書き換え close; exit; ですヨ 理由はSSI出来ないからデス、後UAとかHOSTとか要らないので 外部ファイルは無いデス、(一応重複防止にクッキー吐いてるケド。。。) だからファイルを一つだけ、一回だけ開いてexitデス。 ：あぼーん率が高くなりそうと思って。 うー、これはボクがwriteシステムコールの アトミック性を理解出来て無い(どれ位で分割されるのカ)のでアレですケド、 実は多分0バイトにはなりようが無いデス、truncateして無いので0バイト になる瞬間が無いのデス、VMWARE使って、ファイルロック無し、 forkで50プロセス×3ホストから同時アクセスを何十セットかしてモ、ミスカウントは したけど飛ばなかったですから。。(この辺は突っ込み歓迎デス) これはflockが信頼出来なくて0になると鬱な時とかちょっと（・∀・）ｲｲかも 知れませン、例えばカウントファイル(カウントだけ)を、、、 open (DAT,"+<foo"); flock (DAT,2); truncate DAT,0; seek DAT,0,0; print DAT "$count"; じゃ無くテ open (DAT,"+<foo"); flock (DAT,2); seek DAT,0,0; print DAT "$count"; truncate DAT,length($count); とか。。(これも突っ込み歓迎デス) 取り合えず今のところ50000くらいだけど�dでないのデス。 66 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/19 16:37 ID:???] truncate ってどんな実装よ? >truncate DAT,length($count); ここで小さくなったりしないのか、、しないよな、うーん。 67 名前：ちんげん mailto:sage [01/10/19 19:25 ID:???] おおお、しばらく見ないうちにおいらの分からないエリアに入ってる... これを作ったのは、某所で、CGIのテキストカウンターってないの？ という話があったからなんです。で、んじゃ作るかと思って作ってみた ものなのですが、いやぁ、おのれのあまりの未熟さを痛感しました。 なんか場違いでスマソ。　>1,ALL 68 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/19 19:56 ID:???] >>66 カウントファイル的には桁数が前より小さくなることは無いので、 truncate DAT,length($count);では小さくならないね。 ってことは truncate かける意味も無いけど。 69 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/19 20:46 ID:???] >>67 CGIのテキストカウンター www.around.ne.jp/software/fastky/library/index.html#counter 70 名前：1 mailto:sage [01/10/19 21:45 ID:???] >>65 ありがとう。なんとなくわかりました。 >>67 ぜんぜん場違いでないと思いますよ。 スレが活発化しました。 71 名前：名無しさん＠お腹いっぱい。 [01/10/19 22:14 ID:???] >>65のソースｷﾎﾞﾝ、、イマイチ解らん　　　　鬱 72 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/19 22:30 ID:???] >>69 それ、なってない。 73 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/19 22:35 ID:???] >>69 <counter></counter>なんてワケのわからないタグを使用している時点でアウト。 仕組みは同一だし。 74 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/19 22:41 ID:???] +> 使ってるのなんて始めて見た。 しかもこの場合意味無いどころか、いったんtruncateされるので タイミングによってはindex.htmlが正常に見られない。 75 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/19 23:34 ID:???] お、何か盛りあがってますネ 良く考えたらアプ板なんでボクもあげましたヨ >>71 >>53さんのが入ってるでス flockコメントアウトしたりしていぢめてみてくださイ 調子にのるとカーネルらー に突っ込まれそうなのでこの辺で退散　　　ｻｻｯ(((・∀・；） isweb36.infoseek.co.jp/computer/perldev/cgi-bin/upload/source/017.txt 76 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/19 23:47 ID:???] ところで>>1よ。 ｱﾌﾟﾛﾀﾞの A:hover {color: red; font-weight: bold;} このﾄﾞｷｭｿｽﾀｲﾙ指定を消してくれ。ﾏｼﾞｳｻﾞｲ。 77 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/20 00:22 ID:???] カーネルらー、ってなーに?? 78 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/20 00:23 ID:???] >76 了解。消しました。 -- あぷろだ，テスト設置してみました。 iswebなので，コピペで飛んでください。 ttp://isweb36.infoseek.co.jp/computer/perldev/cgi-bin/tiny_upbrd/upload.cgi まだ拡張子の判定がイマイチです。 79 名前：1 mailto:sage [01/10/20 03:38 ID:???] >78=1 拡張子指定できるようにしました。 isweb36.infoseek.co.jp/computer/perldev/ からもいけます。 80 名前：71 [01/10/20 15:57 ID:DdyXBwQg] >>75 これ良いな、ちょっとflock外して5万回位叩いてみたけどHTMは勿論カウンタデータも飛ばないよ 良く考えたらとびようが無いんだな。syswrite使っとけばより安心って所かな? 俺の使ってる所時々ファイルが飛ぶから、上のKY何とかみたいなのは怖くて使えないんだよ 俺もアクセス解析とか要らない派だから外部ファイル無いのも気に入った ちょっと弄って使わせてもらうよ　THANKS!! 81 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/20 16:21 ID:???] >>80 flockしなかった場合に本当に常に1ずつインクリメントされるかどうかは疑問。 82 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/20 16:27 ID:???] 疑問って・・・される訳ないだろ　　藁 83 名前：名無しさん＠お腹いっぱい。 [01/10/20 16:58 ID:WoA8FLwb] >>80 5万回つーても、同時アクセス数いくつに設定？ 84 名前：ちんげん mailto:sage [01/10/20 17:13 ID:???] 先生！出直してきました。 また見てやってくださいませ。 isweb36.infoseek.co.jp/computer/perldev/cgi-bin/upload/source/018.lzh 85 名前：71 mailto:sage [01/10/20 17:32 ID:???] 何っつーか、、 >>81　やってみれば? >>83　5万回÷俺の環境で許されるほぼ最大のプロセス数だけど?、 つーか君はディスクアクセスなんてオーバーヘッドの馬鹿デカイ処理に対して 単にローカルでforすりゃ十分って事が分からないのかい？　 まー良いや取り合えず>>75　有難う! 86 名前：83 mailto:sage [01/10/20 17:57 ID:???] >>85 いやーん怒んないで。Apacheのおまけについてくる abコマンドでベンチマークとったのかと思ったんですよう。 87 名前：71 mailto:sage [01/10/20 18:52 ID:???] あ、こっちもｽﾏｿ　fork×50でtrigger.plをexec trigger.plで1000forて感じ。 これ以上はNTだとヤバイから、ローカルはIISだからabコマンドは解らないよ HTMをパースしてそこだけ書き換えるってのが、本物SSIっぽくて ちょっと良いなと思っただけ、別に飛ばない方法なら幾らでもあるし と言う事で外野は去る事にする。 88 名前：81 mailto:sage [01/10/20 22:05 ID:???] 疑問っつうか、されない事わかってて言ってますよ:-) 89 名前：名無しさん＠お腹いっぱい。 [01/10/20 22:14 ID:lWm0+PHj] ゴミどもめ。 早く死になさい 90 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/20 22:20 ID:???] (´-`).｡ｏＯ(また変な流れになってきたね･･･） 91 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/20 22:25 ID:???] わかってて疑問なのかよっ！！ 92 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/21 00:17 ID:???] >>84 取り合えずCGIならdieは辞めとけ、エラールーチン書いてそこに飛ばせ ただ例えばファイルが100kbだとして、書き換えたいのは20バイト足らずなのに 毎回全部書き直すってのは効率はよろしくないってこった、 その程度の効率は俺は気にしないけどな、それが嫌なら75のをパクれ 93 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/10/21 02:34 ID:???] 100kbのHTMLファイルなんてヤダ！（いや、わかってるよ 94 名前：1 [01/10/23 02:28 ID:RBVSiDON] あぷろだのネタが思いつかなくなってきたので，XBM表示CGI作りました。 <IMG src="xbm.cgi?100">で100と表示します。 サンプルは isweb36.infoseek.co.jp/computer/perldev/cgi-bin/print_xbm/view.cgi です。 □と■の文字列から画像データを生成するようにしてみしたが， 変換処理，ごちゃごちゃして少し読みづらくなっちゃいました。 95 名前：仕様書無しさん [01/10/27 23:41 ID:YdPss8Pv] (´-`).｡ｏＯ（移転あげなの・・・） 96 名前：1 mailto:sage [01/10/28 00:59 ID:???] >95 ありがとです。 今ちまちまとネタCGI（物語自動作成）作ろうとしてるんですが， いきなりデータ形式でつまってます。 作ってみたいのいくつかあるんで，浮気しながらちょこちょこ書いてこうかと思います。 97 名前：デフォルトの名無しさん mailto:age [01/10/31 21:41 ID:???] (´-`).｡ｏＯ（ちょっと別スレで使わせてもらっちゃった････ダメ?　) 98 名前：1 [01/11/02 04:59 ID:/ySb/MGF] >>97 全然問題ないです。そういう意味もこめて置いたので。 -- 改造工房用にアプロダ置いたら，どのくらい利用されると思いますか？＞ool 99 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/11/02 07:44 ID:???] >>98 ログ設定を大きくしていると利用されやすいかも。 すぐに流れると、投稿する方も閲覧する方もツマンナイし。 （ぁゃιぃ風味は止めた方が良いですよ） 100 名前：1 mailto:sage [01/11/03 04:40 ID:???] あぷろだ v0.1.2をあげました。 >>1 からいける，「あぷろだテスト」のほうです。 CONFIGとテンプレまわりいじって，CSS使ってみました。 101 名前：1 [01/11/03 23:46 ID:kIdT+u23] あぷろだ v0.1.2.1をあげました。 最適化とバグとりです。 複数ページ化をどうやるか考えてます。 102 名前：名無しさん＠お腹いっぱい。 [01/11/05 17:00 ID:LgoarrLr] >>101 v0.1.2とv0.1.2.1を展開するとupload.cgi.binのようなファイル名になって 各ファイルにバイナリっぽいヘッダが付いてるんだけど、 もっかいアップしなおしてもらえませんか？ 103 名前：1 mailto:sage [01/11/05 17:27 ID:???] あっ，すいません，MacBinaryで圧縮かけちゃってました。 0.1.2.1あげなおしました。 多分これでおけだと思います。 104 名前：1 [01/11/07 07:22 ID:p5r/Tumr] 複数ページ化したv0.1.3，あげて設置しました。 >>1 からいける，「あぷろだテスト」です。 105 名前：名無しさん＠お腹いっぱい。 [01/11/08 03:07 ID:LQlTaHHV] 初心者スレで教えてもらったのを忘れないようにと vars.pmいじってglobal.pm作ってみました。 グローバルな変数とかをシミュレートします。 106 名前：名無しさん＠お腹いっぱい。 [01/11/10 00:18 ID:???] ﾏｯﾀﾘ上げ♪　（・∀・ ） 今一盛り上らないのはCGIの悲しい所かな、、、 Cと違ってperlは関数に千切りすぎると極悪に遅くなるからねー 今Socketで遊んでるから、LWP::Simpleもどきでも出展してみようかしら　ｗ 107 名前：1 [01/11/15 14:16 ID:ra8XDH7X] ログファイルをモジュール使ってうまく管理できないかと オブジェクト指向のを調べてましたが，なかなか難しいです。 DBやTieのやり方が関係あるのかな。 >>106 分割してくと遅くなるんですか。今まで千切りまくってました(^^; Socketとかさっぱりわからないので，ばりばり使ってる人を見ると すごいなぁと思います。 108 名前：1 mailto:sage [01/11/19 11:59 ID:???] >107 のモジュール考えてたら，あぷろだにバグ見つけました。 ロックがかかってるようで全然かかってません。 修正は少し手間取りそうです。 109 名前：名無しさん＠お腹いっぱい。 mailto:age [01/12/19 13:44 ID:???] 設置方法がわからない 110 名前：名無しさん＠お腹いっぱい。 mailto:sage [01/12/19 20:17 ID:???] えと，あぷろだなら，新しいCGI.pmとHTML::Template.pmをパスの通った適当なところに入れて パーミッション設定して，upload.cgiの１行目のパスを変えて， ２〜16行を削れば動くはずですが，自信無いです。 Perl勉強中の素人が書いたのでバグ入り低機能・高負荷です。 今フォームデコードも単体でできるようにと いろいろ書き換えてますが，手間取ってます。 111 名前：　 [02/01/01 12:05 ID:+ymJLOJv] 解凍の仕方がわかんない 112 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/01 12:17 ID:???] ↑ 生きる価値ゼロ　v(＾v ＾* 113 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/01 13:23 ID:???] 死に方がわかんない 114 名前：　 [02/01/03 03:44 ID:yfnaT3pD] >>113 choco.2ch.net/test/read.cgi/news7/1009233792/ 115 名前：よしだみつお mailto:info@k-server.org [02/01/03 09:08 ID:???] 『改造クン』とかいう共産主義者で偏差値80以上の高校生(現在2ﾁｬﾝﾈﾗｰ)の クソガキが運営している最低なHPスペースです。 ユーザーの事など全く考えずに、こづかい稼ぎだけが目的で営利主義に走ってやがります。 天罰を与えてやりましょう！！ イタズラ登録をしまくって下さい。悪用しちゃってもいいですよ！！ 鯖に負荷かけまくって責任とらせるってのも面白いかも(ﾌﾟ k-server.org/　k-server.org/　k-server.org/ k-server.org/　k-server.org/　k-server.org/ k-server.org/　k-server.org/　k-server.org/ k-server.org/　k-server.org/　k-server.org/ この文章のコピー・転載を歓迎いたします。 116 名前：名無しさん＠お腹いっぱい。 [02/01/03 21:12 ID:nWDcFjev] >>115 よくも飽きずに自作自演してんなぁ。 117 名前：名無しさん＠お腹いっぱい。 [02/01/04 00:44 ID:ZDJ61sb3] >>92 あとあれです。 openの後のdieは、||ではなく、or dieを使うことが推奨されています。 (らくだ本では。perlfuncにはその記述はありませんね) いずれにしても、処理に失敗したらエラーメッセージを出す仕組みは 必ず必要になるので、簡単なスクリプトであっても、 用意して置くに越したことはないと思います。 118 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/04 03:40 ID:???] >openの後のdieは、||ではなく、or dieを使うことが推奨されています。 その根拠は？、優先順位理解する方が大切じゃないかと思うが 是非説明おねがい 119 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/04 08:27 ID:???] >118 >その根拠は？ 当ててみな( ﾟДﾟ)y-~~~ 120 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/04 09:43 ID:???] 評価順位知らない馬鹿がカッコ外して嵌るから　ヽ(´ー｀)ノ 121 名前：名無しさん＠お腹いっぱい。 mailto:age [02/01/08 02:32 ID:???] 浮上 122 名前：名無しさん＠お腹いっぱい。 [02/01/09 23:53 ID:IrymNKBw] JavaのInterfaceをヒントにInterface.pmを作ってみた。 ホントはMLに投稿しようと思ったけど、 急に2週間ほどネットに繋げないことになったんでここで。 全然磨いてないけど着眼点は悪くないと…自分では思う。 123 名前：名無しさん＠お腹いっぱい。 mailto:age [02/01/11 15:15 ID:???] >>122 5.6入れてないんで動かなかったけど これを使うとメソッド名の統一ができるのかな 最近メソッドの命名に悩んでたので参考にさせてもらいます 124 名前：名無しさん＠お腹いっぱい。 [02/01/11 15:24 ID:FU5QMXGq] >>115 偏差値なんて相対的な物だから自慢したいならまず偏差値８０を出した テストを明らかにしてね。 125 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/11 15:45 ID:???] テストを明らかにしても意味は無い　（笑 126 名前：名無しさん＠お腹いっぱい。 [02/01/12 15:26 ID:Ca0kINDV] あげ〜 127 名前： ◆RUwjICBI mailto:sage [02/01/16 17:39 ID:???] 無常を爭ひ去るさま、 pc.2ch.net/test/read.cgi/perl/1009299447/129 128 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/17 05:07 ID:???] あぷろだ1.01。 HTMLソースの下の方にベンチマークを書き出すようにしました。 Logs.pmを使ってログを管理するようにしました。 まだ中途なのでsage。 129 名前：名無しさん＠お腹いっぱい。 [02/01/28 07:41 ID:U2Qq819d] 名前も保存されるようにするのってＦＴＰ機能じゃないとダメなのかな 130 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/28 19:00 ID:???] ？別にリネームしなければいいだけでろ？ 穴だけど 131 名前：名無しさん＠お腹いっぱい。 [02/01/28 19:54 ID:Vj1E59E1] あぷろだなんだが、{}で囲ってなんかやってるとこあるじゃん。 { # ○整形 みたいにね。 ここはさ、メソッドとして抽出したほうが見通しよくなるとおもうんだが、、、 132 名前：名無しさん＠お腹いっぱい。 [02/01/28 20:57 ID:U2Qq819d] ＞リネームしなければいい もれじゃできねえから、できたらだれかやってくれ 133 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/28 22:30 ID:???] ユニークである必要があるし、このままでいいだろ。 コメントをちゃんと書けば不便じゃないさ。 134 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/29 14:14 ID:???] >>133 サーバに保存されるファイル名と、ダウンロードされるファイル名は 一緒である必要はないから、OKと思う。 ただ、ダウンロードのためだけにCGI起動させるのはアレなんで、 mod_rewriteとか通してやれば素敵になりそう。 135 名前：1 mailto:sage [02/01/29 14:22 ID:???] >>131 　ありがとうございます。 　あのあたりはごちゃごちゃしてるので なんとかしたいと思ってるんですが， 分けようとしても速度遅くなるわ変数のやり取りが見辛くなるわで うまく書けなかったのでああなってます。 　ああいう切り分けとかをサクっとできればいいんだけど， 時間かけて悩んでる割に大したモノが書けない・・・ 136 名前：名無しさん＠お腹いっぱい。 [02/01/29 16:16 ID:7v+0Ir29] >>1 気づいた点をすこし。 [main.pl] > use lib '/home/mas/www/library', '.'; * 環境に依存する部分は下記みたいに分離した方がいい。とくに多くの人に使ってほしいの なら。 BEGIN { do "setenv.pl" if -e "setenv.pl" } BEGIN { push(@INC, $ENV{YOUR_PERL_LIB}) if $ENV{YOUR_PERL_LIB} } * "." は必要ない。 * パフォーマンスにこだわるのなら lib は使わない。内部でConfig.pmをつかっ ているので以外と重い。 > use CGI; 必要とするCGI.pmのバージョンは? おれは2.46なんで、CGI::cgi_error、CGI::uploadとかないと怒られた。 137 名前：1 mailto:sage [02/01/29 16:59 ID:???] >>136 ありがとうございます。 CGI.pmは2.47からupload()や cgi_error()が実装されたようなので， 2.47以上が要ります。　開発では2.78使ってます。 前はバージョン指定してましたが，書き換えた時に消しちゃったみたいです。 138 名前：名無しさん＠お腹いっぱい。 [02/01/29 17:34 ID:7v+0Ir29] 依存しているモジュールとバージョン、そのモジュールが取得できるURL あたりをドキュメントに書いといてもらえるとうれしい。 iswebは5.6.1かぁ。。。5.005_03ってもう古いのかな。 139 名前：名無しさん＠お腹いっぱい。 [02/01/29 19:04 ID:9LBydpPt] >138 Perlの作者ﾀﾝが、5_005_03なんてつかってちゃいやぁん ていってるよ？？ なんかセキュリティ的にもよろしくないそうです。 140 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/29 20:32 ID:???] そうなのか。じゃあ漏れも5.6.1に移行しよっと。 141 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/29 20:45 ID:???] >>139 ソースきぼんぬ。 142 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/29 20:50 ID:???] 「セキュリティ的によろしくない」の部分をもっと詳しくｷﾎﾞﾝﾇ。 143 名前：名無しさん＠お腹いっぱい。 mailto:age [02/01/29 21:12 ID:???] >141-142 て・め・え・で・し・ら・べ・ろ（・∀・） 144 名前：名無しさん＠お腹いっぱい。 [02/01/29 21:23 ID:9LBydpPt] ていうか、俺も出自忘れちゃった。 ｴﾗｿｰﾆｲｯﾃｺﾞﾒｿﾖ（・∀・） Perl5.6.1のドキュメントの日本語訳のサイトの端書きの 作者の言葉の部分、あそこだったと思います。 145 名前：142 mailto:sage [02/01/30 00:49 ID:???] いえいえ、ボンクラ厨房の分際で高貴なる2chBBSに書き込んでしまって 申し訳御座いません。 所で少し疑問なのですが「出自」って何ですか？ 出典　と 辞典　を 脳内合成して 出自　になるんでしょうか? なんて読むのこれ「でぢ」？ 146 名前：1 mailto:sage [02/01/30 01:28 ID:???] >>138 今回も次のまで時間かかりそうなので，とりあえずですが 必須らしい環境を書いておきます。 perl5.005 CGI.pm 2.47 search.cpan.org/search?dist=CGI.pm 解説： member.nifty.ne.jp/hippo2000/perltips/Cgi.htm HTML::Template.pm search.cpan.org/search?dist=HTML-Template 解説： member.nifty.ne.jp/hippo2000/perltips/html/template.htm KCatch.pm #use CGI::Carp 'fatalsToBrowser' で代用できるかも www.kawa.net/works/perl/catch/ 解説： www.kawa.net/works/perl/catch/KCatch-j.html 147 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/30 01:43 ID:???] >>145 >所で少し疑問なのですが「出自」って何ですか？ どういう風に笑って欲しくて書いたのか教えてくれ。 148 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/30 01:54 ID:???] >>147 あ、笑って欲しかったのか。 思わずマジレスしそうになっちゃったよ。 ごめん。 149 名前：名無しさん＠お腹いっぱい。 [02/01/30 03:16 ID:CYuhEnG/] >145 gooで「出自」調べて読むか、自分なりに読んだらいいよ。 「浜崎あゆみ」って読もうと「田中真紀子」って読もうと「ﾑﾈｦ」って読もうと 奇異の自由だよ。 150 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/30 09:12 ID:???] ようするに、>>145はボンクラ厨房未満だった、、と。 151 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/30 12:01 ID:???] >150 何怒ってるの? 152 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/01/30 17:48 ID:???] >>151 どこを見れば怒ってるように見えるのか問い詰めたい。 153 名前：名無しさん＠お腹いっぱい。 mailto:age [02/01/30 17:54 ID:???] >>149 dictionary.goo.ne.jp/cgi-bin/dict_search.cgi?MT=%BD%D0%BC%AB&sw=2 gooで引いてみたよ。 しゅつじ 【出自】 （1）でどころ。うまれ。出所。 （2）文化人類学で、個人が生まれた時から認識される系譜関係。血縁。「―集団」 154 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/02/01 19:08 ID:???] 自分の知らない単語＝造語 って思ってる緒ヴァカさんがいるスレはここですか？ 155 名前：名無しさん＠お腹いっぱい。 mailto:sage [02/02/03 04:14 ID:???] multipartデコードを自力でやろうとしましたが， 把握できなくなってきたので，CGI::Minimalを試してみてます。 時間がたっても楽に読めるように書くのって難しいです…… 156 名前：あぷろだ [02/02/07 03:37 ID:4ZCZT+Ah] あぷろだ v1.02上げました。 何回も見直してバグは無いはずなんですが， ポカしてるんじゃないかとちょっと不安です。 変更点は以下のとおりです。 ・package uploader; と明示するようにした。 ・CGI.pmをやめて CGI::Minimalを使うようにした。 ・環境に依存する設定は setenv.plで行うようにした。 ・使用スクリプツを ./lib/以下に移動した。 HTML::Templateと CGI::Minimalが必要です。 KCatchも使ってますが，これは使わなくてもいいです。 search.cpan.org/search?dist=HTML-Template www.nihongo.org/snowhare/utilities/modules/cgi-minimal/ www.kawa.net/works/perl/catch/KCatch-j.html 使ってる CPANモジュールも，あぷろだとまとめて上げたほうがいいですか？ 157 名前：nobodyさん mailto:sage [02/03/21 20:11 ID:???] ファイル名保持機能つけて 158 名前：nobodyさん [02/04/09 22:18 ID:RNJ4fGuJ] 誰か人工無能付きのチャット作って〜 159 名前：nobodyさん mailto:sage [02/04/09 23:03 ID:???] >>157 じゃぁ人口無能エンジン作って。 160 名前：nobodyさん [02/08/23 00:01 ID:mZ+fotXI] age 161 名前：山崎渉 mailto:（＾＾）sage [03/01/15 13:50 ID:???] （＾＾） 162 名前：山崎渉 mailto:（＾＾） [03/03/13 17:54 ID:???] （＾＾） 163 名前：山崎渉 mailto:（＾＾） [03/04/17 12:13 ID:???] （＾＾） 164 名前：山崎渉 mailto:（＾＾）sage [03/04/20 06:20 ID:???] 　　 ∧＿∧ 　　（　　＾＾ ）＜ ぬるぽ（＾＾） 165 名前：山崎渉 mailto:（＾＾） [03/05/22 02:20 ID:???] ━―━―━―━―━―━―━―━―━[JR山崎駅（＾＾）]━―━―━―━―━―━―━―━―━― 166 名前：山崎渉 mailto:（＾＾） [03/05/28 17:10 ID:???] 　　　 　∧＿∧ ﾋﾟｭ.ｰ　(　　＾＾ ） ＜これからも僕を応援して下さいね（＾＾）。 　　＝〔~∪￣￣〕 　　＝ ◎――◎ 　　　　　　　　　　　　　　　　　　　　　山崎渉 167 名前：山崎 渉 mailto:（＾＾） [03/07/15 11:24 ID:???] 　__∧＿∧_ 　|（　　＾＾ ）|　＜寝るぽ（＾＾） 　|＼⌒⌒⌒＼ 　＼ |⌒⌒⌒~|　　　　　　　　　山崎渉 　　 ~￣￣￣￣ 168 名前：山崎 渉 mailto:（＾＾）sage [03/08/02 02:29 ID:???] 　　 ∧＿∧ 　　（　　＾＾ ）＜ ぬるぽ（＾＾） 169 名前：ぼるじょあ ◆ySd1dMH5Gk mailto:（＾＾） [03/08/02 05:02 ID:???] 　　　 　∧＿∧　 ∧＿∧ ﾋﾟｭ.ｰ　（　 ・３・） (　　＾＾ ） ＜これからも僕たちを応援して下さいね（＾＾）。 　　＝〔~∪￣￣￣∪￣￣〕 　　＝ ◎――――――◎ 　　　　　　　　　　　　　　　　　　　　　山崎渉&ぼるじょあ 170 名前：山崎 渉 mailto:（＾＾） [03/08/15 23:26 ID:???] 　　　 (⌒V⌒) 　　　│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。 　　⊂|　　　　|つ 　　　（＿）（＿）　　　　　　　　　　　　　　　　　　　　　　山崎パン 171 名前：電脳プリオン mailto:sage [04/07/19 17:59 ID:???] まだ開発してますか？ 172 名前：nobodyさん mailto:sage [04/07/22 13:06 ID:???] 　　　　　　　　　　　　　　　　　　_,..-‐‐-..,,_ 　　　 _,,.-‐‐-..,,,　　　　　　　　,r':::::::::::::::::::::ヽ 　　,r':::::::::::::::::::::::ヽ　　　　　　/:::::::::::::::::::::::::::::ヽ 　./::_;;;::;;;_::::::::::::::::;;l/／-‐-‐;l;;::::::::::::::;;:-‐‐--:;;l 　l/~　　　~ヽ::::::::::::::::::::::::::::::::::::::::::::;r'彡　　　　 l 　l　　　　 ヾ／　　　:::::::::::::::::::::::::::::::::ヽ　　　　 / 　ゝ　　　　/　　　　　　::::::::::::::::::::::::::::::ヽ　 _,,-'' 　　~'‐.,,,,,_l ／て^ヽ　　　　　 ,;;r=i≦;;:::ヽ'~　　　　　 　　　　　 ｌ |o ゝ,_ノ|　　　　 ''~　　　　　 _l.　　　　 　　　　　.l ヽ( )_,,ノ　 `'　　　　　 _,,..-‐''',,,l,　　　 　　　　　l_,,,,,,_　　 （__人__ノ　　　 __,,,,,r'::::::l　　　 　　　　￣l_,,,.　　　　ヽ:::::::ｌ　　　　 ,r'~ ゝ;ノ　　 　　　　 -''ゝ、　,,,　　 ゝノ　　　　　　　　/　　　　　 　　　　　　　 ''r':::ヽ　　　　　　　　　　 /　　　　　 　　　　　　　　ゝ;;ノ　　　　　　　　　　ヽ　　　　　 　　　　　　　　/　　　　　　　　　　　　　'l　　　　　　 　　　　　　　　l　　　　　　　　　　　　　　l 　　　　　　　　ゝ　　　　　　　　　　　　 ./ 　　　　　　　　/^'‐-t''''○ ○~^''''t-‐^ヽ 　　　　　　　　~‐‐'~　　　∪　　　　~'‐‐~ 173 名前：nobodyさん mailto:sage [04/07/27 20:10 ID:???] 　 __,冖__　,､　 __冖__　　 /　／/　　,,,..-‐‐‐-..,,, 　`,-.　-､'ヽ' └ｧ --'､　〔／　/.　 /::::::::::::::::::::::::ヽ　　　　　　　 _,..-‐‐-..,,, 　ヽ_'_ﾉ)_ﾉ　 　 `r＝_ﾉ　　　 /　　l::;;-‐‐-:;;::::::::::::ヽ/／-‐,,__ ／:::::::::::::::::::::ヽ 　 __,冖__　,､　　　,へ　　　 /　 ,ｨ l:l　　　　ヽ:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::ヽ 　`,-.　-､'ヽ' 　 く <´　　　7_／/　ヽ　　 ／　　　:::::::::::::::::::::::::::::::::::::;-'^~~^'‐;;:l 　ヽ_'_ﾉ)_ﾉ　　　　＼>　　 　　/　　　~ヽ/　　　　　　:::::::::::::::::::::::::::::::ヽミ　　　.ll 　　　ｌｌ　　　　　|｜ .,ﾍ 　　/　　 　　　/　／￣^ヽ　　　::::::::::::::::::::::::::::ヽ　　,.ノ 　　　ｌl　　　　　ヽ二ノ__　 ｛　　　　　 /　 |　　・　.|　　　　　:／￣^ヽ:::::::l'^~ 　　　ｌ|　　　　　　 　 _| ﾞっ　￣フ　‐/-,,　ヽ,＿,,ノ　　　　　 |　 ・　　|:::::::l 　　　|l　　　　　　　 (,･_,ﾞ> 　／　　 l　　~^''　　　　　`‐'　　 ヽ.,＿,,ノ　　:l 　　　ｌl　　　　　__,冖__　,､　 >　　'''l^^~~~　　　 　/￣￣ヽ　　　 -‐‐‐--l- 　　　ｌ|　　　 　`,-.　-､'ヽ' 　＼　　ヽ、　,,,,　 　　| |||!|||i||!| |　　　~^'‐..,,_/ 　　　|ｌ　　　　 ヽ_'_ﾉ)_ﾉ 　　ﾄー　　　/ （:::::｝　 　| | |ll ll !!| |　　　 ,,,,　イ~''' .　ｎ.　ｎ.　ｎ　　__,冖__　,､　|　　　　 l:　　~~　　　| |!! ||ll| || |　　 ｛:::::） ::l 　 |!　 |! 　|!　 `,-.　-､'ヽ' i　　　　　l:　　　　　　 | | ! 　　| l　　　 ~~　　l 　 o　 o 　o 　ヽ_'_ﾉ)_ﾉ　 {.　　　　　l、　　　　　 ヽ`ニニ'ノ　　　　　　 ,l＞ 　　　　　　　　　　　　　／　　　　　/^‐-,,____,,,,,,,,..................,,,,,,,__,,,.--ヽ 　　　　　　　　　　∨⌒　　　　　　　~‐‐'~　　　　　　　　　　　　　^'‐‐~ 174 名前：nobodyさん mailto:sage [04/08/23 16:05 ID:???] 22 175 名前：nobodyさん mailto:age [04/09/11 01:02:49 ID:???] age 176 名前：nobodyさん mailto:sage [2008/01/06(日) 14:07:38 ID:???] 電脳プリオン どこにでもいるなw 177 名前：nobodyさん mailto:age [2008/07/10(木) 07:38:34 ID:???] 教えて 178 名前：nobodyさん mailto:gage [2009/09/07(月) 19:11:43 ID:???] >>177 なにを？

---

---

[ 新着レスの取得/表示 (agate) ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef