【CGI】合同開発室

0001当方へたれですが01/10/02 00:35 ID:GsMMcvtM
合同で学習用スクリプトとかの開発をできないかと思って
iswebだけどアプロダ置いてみました。
http://isweb36.infoseek.co.jp/computer/perldev/
参加してくれる人キボン

0002当方へたれですが01/10/02 00:35 ID:GsMMcvtM
もちろん私もなるたけ参加します。
私はちまちまサブルーチンやアプロダをやる予定。
チャットとかもやってみたいけど設計はとくにへたれだからなぁ。

0003100%01/10/02 00:38 ID:???
空中分解するでしょう  w

0004当方へたれですが01/10/02 00:42 ID:???
>>3
掲示板改造するって人らが来てくれるかなぁとか思ってるんですが
うう,やっぱそうですかね。

0005100%01/10/02 00:50 ID:???
つかここ人少ないからねー ヽ(´ー`)ノ
でもPG板でソースアプ板無いのも何かと不便だから
「ソースなら良いですよ」ってスタイルならポインタ示したい
時なんかに便利じゃないかな、それで副産物的にテクニックが学べると
いいね お互い

0006当方へたれですが01/10/02 01:04 ID:???
>>5
exeやrmとか置かれるとさすがに困るけど,
Cとかのソースなら範囲内と思てます。

アプロダはざっとしかソース見てないんでちょと不安。
はやく把握したいけど私にはむつかしい・・・

0007当方へたれですが01/10/02 01:20 ID:GsMMcvtM
Network.plを上げてみた。

またいきなり厨房臭いところから攻めてきたね  :-)
まあ方向的には良さそうだが・・・

0009名無しさん01/10/02 08:30 ID:6SpiWnfc
ここの掲示板をつくろうスレって結局完成したんだっけ?

何人か作ったと思うけど、共同では完成してないよ。
もっとも、あのスレは共同開発の雰囲気でもないよね。

0011当方へたれですが01/10/02 22:51 ID:???
CGI.plアプ。
クッキー読み書き,フォームデコード。
今回,POST・GETの切り分け,自動判別や,GETのみ取得,ファイルアップロード対応,とかは保留。
アプロダはテンポラリファイル削除でエラー出てるのをなんとかしたい。
上のを実装したらアプロダ作りに挑戦する予定。

0012当方へたれですが01/10/04 00:42 ID:/0/769eo
へたれっぷりを再認識しつつCGI.plのフォームデコード部分をアプしてみました。
メソッド判別して,POST・GETそれぞれのデコード関数に振り分けるように。
次はファイルアップロードのを予定。

あそこに上げたのはいじられる覚悟の上ですんで,
修正や添削してもらえるとありがたいです。
いじられるのに同意してくれて俺の関数もどうよ?
って人が何人かいると共同開発の雰囲気になるかなぁ。

マルチパートを綺麗にデコードしてくれー  (笑

0014当方へたれ01/10/04 01:48 ID:???
multipart/form-dataのフォーマットがわからなかったので
そのままGETみたくデコードしてました。
とほほとかで調べてみます。
ちんたら調べてる間に添削されたのがアプされてたりなんかすると,
オープンソース開発ぽいかも。

0015名無しさん@お腹いっぱい。01/10/04 03:39 ID:f6uUGLLk
CGI.pmじゃだめなの?

0016当方へたれですが01/10/04 03:51 ID:???
マルチパートデコード調べてみました。
残念ながら実力不足で実装までいけそうにないです。

>15
学習用にと思いまして。

> ちんたら調べてる間に添削されたのがアプされてたりなんかすると,
>オープンソース開発ぽいかも。

申し訳無いが、今の所「いまさらそれ?」的なものだけなのでね。
CGI.plにしても15の言うとおり、CGI.pmがあるわけだし。
まぁ頑張って下さい(スレと関係無いのでサゲ

 遠慮なく人のソースいじるってのは他のとこだとできないんで,
ここがそうなればなぁと思ってましたが,私じゃ力不足だったようです。
 だれかが作ってくれないかなぁと思って待ってても
できなかったので,自分がアプロダ置きました。
 何も無いところにアプする人がいるとも思えなかったので,
自分が書いたのを上げました。
 ランダムアクセスとか,超高速日本語コード変換とか,
すごい人の 役にたてるのを作れるほどの実力があるとは思えないので,
自分くらいのレベル向けにいろんなののをメモしとこうと
書いてました。
 人が来るようになったら誰かにアカウント移そうと思ってましたが,杞憂でしたね。

0019当方へたれ=1801/10/04 06:19 ID:???
というかこれは「合同開発室」じゃなくて
「私のプログラムを添削してください」ですね。

この板住人の数が少ないからねー。もすこし待っててみ。
2週間ぐらいスレが生き延びれば定着するよ。
そのためにはネタを出し惜しみして、
ヘッドラインから消えたらageるぐらいでちょうどいい。

00212001/10/04 06:50 ID:???
>ヘッドラインから消えたらageるぐらいでちょうどいい。
う。全然ちょうどよくねえ!
よく見たら最終書き込み9月25日の雑談スレが
まだヘッドラインに残ってるじゃねーかよ!
この板の回転の遅さを甘く見ていた。
あらためて寂寞を感じる今日このごろ。。。

一応自作Scriptを書くらいは何とかなるんですが、人様に教える程
には知らない事が多すぎる自分。
multipart/form-data は、先日(勉強も兼ね)自前で実装させたん
ですがRFCやらCGI.pmやら見てかなり泥縄でやったので見せるほどの
物でも無し…(ブラウザごとの実装の違いの可能性はほぼ気に
しなかったし…)。

とは言うものの、スレの趣旨は悪くないので出来たら応援したいっす。

>>21
でも不思議な事に糞スレやら糞カキコは後を絶えないんですよね…。

>>1
似たようなスレの末路
http://ebi.2ch.net/test/read.cgi/php/1001318195/

0024当方へたれですが01/10/05 23:52 ID:1j62Ctwg
CのをまねしてAssert.pl作ってみました。
条件式と変数のリファレンスを渡すと,条件が偽の時STDERRに
条件式と,パッケージ・ファイル・行,変数の内容を吐きます。
たぶん今回も車輪の再開発です。

CGI.plを勉強用で片付けないで、CGI.pmを超えるものを作ればいいじゃん。
というわけで、CGI.pmの問題点とか挙げていこーよ。

とりあえず、h1とかHTML生成用のメソッドと、paramとかを分離してくれ。
#HTML::Templateを主に使っているので、h1とかいらないんだよね〜。

>>24
ファイル名をAssert.pmにして、assertって関数名を
mainパッケージにエクスポートすると使いやすくない?

正式にExporterのサブクラスにするとかの
おおげさなことじゃなくて、どっかに1行
*main::assert = \&assert;
を入れてmainからアクセスできるだけでもいいと思うんだけど。

こんなふうに、必要なとこでrequireして使う感じ

require Perldev::Assert;
$_ = 'AAA';
my $hoge = 'BBB';
assert( q[$_ eq ""], (\$_, \$hoge) );

遅くなるだけで無意味だけどBoolean.pm

つーか.plと.pmの拡張子は認めてくれよ。

0029名無しさん@お腹いっぱい。01/10/06 13:01 ID:0fYRCZ0M
>>25
use CGI qw(:cgi);
でいいかと。

>>27
もらったよ。use overloadの勉強用に。

>>28
だから全部".txt"だったのかよ!

0032当方へたれですが01/10/06 17:03 ID:???
アプロダの設定変えました。
たぶんこれで.plと.pm置けるようになったはず。
Boolean.pm見て勉強してきます。

0033名無しさん@お腹いっぱい。01/10/07 00:37 ID:rgyPDIMY
ドキュメントをpodで埋め込まないなんてナンセンスだよ。

00342701/10/07 10:38 ID:???
>>33
ごもっとも。自分でもそう思った。
学習用のなんだから面倒くさがらずにやりゃよかったな。

おい、行けなくなってるぞ。

突然動かなくなったのでいろいろいじってみましたが治せませんでした。
サポート掲示板によると,isweb36サーバーの一部が落ちてるみたいです。

サーバー復帰したみたいです。
ついでに画像閲覧とかFTPとかの使わなそうな機能を削りました。

0038hage01/10/15 07:49 ID:???
age

0039101/10/16 03:42 ID:TCS0inSE
低機能アップローダあげました。
このペースだと来年すぎまでかかりそうなので,
今回は自分でフォームデコードはせずに,CGIとFile::Copy使ってます。

content-typeだけでファイルタイプを判定してるので,
plやpmはtxtになっちゃいます。
CGI.pm使ってHTMLを書いたけど,使いづらいしソースも見づらいので
こういうのに便利らしいHTML::Templateを調べてきます。

何か知らんけど頑張れ!  (・∀・)

0041ちんげん01/10/16 19:55 ID:5A+7lSiO
ヘタレながら参戦。
「CGI」の「テキスト」カウンターできたよ〜。

>>41
@file = <IO>;
foreach (@file){ }
より
while(<IO>){ }
の方が良いと思われ。

0043ちんげん01/10/16 21:11 ID:???
ヘタレにつき、詳細キボンヌ。スマソ。

0044!4201/10/16 21:44 ID:???
いちいち@fileに入れずに、while(<IO>)で一行ずつ処理する方が、
サーバーにも優しいカウンターになる、という意味だと思われ。

0045!4401/10/16 21:56 ID:???
あれ位のHTMLなら気にする事も無いのかもだけどね
例えばトップが50KBのhtmlとかだと50KBの配列が出来ちゃう
と言うかテキストカウンターっぽい事をしたいなら
読み書きモードでopenして、カウンターの位置までseekしてprint
した方が良いよ。ヘッダなんかを書き換えた時はメンテする必要が
有るけどね。

0046名無しさん@お腹いっぱい。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.

>41
ロックのところは open or die "Error:$!" みたいに
if ! 使わずに or 使ったり $! も表示したりしたほうがいいと思う。

>40 ありがとう。ちまちまやってきます。
>41 参戦感謝。
>46 情報感謝。
 CPAN繋がらなかったんで検索しなかったんですが,標準で付いてましたか。
 標準添付のを見てみたら,以外とライブラリもあるんですね。初めて知りました。

--
HTML::Template調べたところ,以外と簡単そうです。
今日は試しにアプロダの,テンプレだけを書いてみました。

> 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;
こんな流れで。

0050ちんげん01/10/17 09:12 ID:???
>>44 >>45
どうも、ありがとうです。
一回の読み書きOPENで書き換えするのに、seekでカウンター値の先頭への
ポインタを得る方法を考えていたら頭から煙が出てきました。
# なんか見当はずれなことしてんのかなぁ。

>>49

> こんなわけのわからない処理は止めなさい。

厨スクリプトでお目汚しスマソ。

> あと、変換はs///eg一発で出来るよ。

s///egってのがあるんで?勉強してきます。

> もっと言うと、テンポラリファイルに書き出してからrenameしたほうがいい。

そか、一旦、テンポラリに書き出してそれからリネームすればいいのか。
それで昨晩ずーっと悩んでました。

> openの戻り値はきちんとチェックしようね。

Σ(;´Д`)
あっ、ホントだ。してなかった。鬱だ。

大変参考になりました。ありがとうございました。勉強になります。
出直して参ります。

Caller.pm上げてみた。
my $cl = new Caller;
print $cl->line;
use Caller qw(caller) でオーバーライドも。

0052101/10/18 04:29 ID:???
>51
勉強用にいただきました。じっくり読めばなんとか理解できそうです。
39:*pkg = \&pakcage;
typoぽいです。

--
すごいなー私も頑張ろう!とあぷろだ上げました。
変更点は,昨日のテンプレ修正と,ファイル名変更,表示部にテンプレ導入,他に少しです。

>>45
こうすればメンテ不用になるぞ、っと。

while (<HTM>){
    if (/<!--count-->(\d+)<!--\/count-->/){
        seek HTM,-length,1;
     #書き換え
        last;
    }
}

でもdだ時HTMLごと逝っちゃうのはイヤな感じかも  (w

> seek HTM,-length,1
これなに?

>>50
s///eg のeオプションはいらないだろう。

>>55
たとえば、
s/(\d+)(?=<!--\/count-->)/$1+1/eg
とか。

>>56
いやだから、上記の例では必要ないだろうと言っているの。

00584501/10/18 23:30 ID:???
>53 おー さんちぇ!
そっかバックすれば良いんだネ、うちはカウンターまで4行しかないから
イイ(・∀・)感じになったヨ

:でもdだ時HTMLごと逝っちゃうのはイヤな感じかも  (w
うちは閑古Webだからネ、一応ロックバリバリにしてるけど今の所大丈夫みたい
200hit/DAYって感じだからかナ

>54
seek HTM,-length($_),1だヨ

>>50 に書いてある流れで、
s/// だけでカウンタインクリメント出来ると?

55は49を読んでないツッコミ症候群だと思われ、、、

0061101/10/19 06:46 ID:UfCiRs0I
あぷろだv0.1.0上げました。
投稿削除ができるようになりました。
変更点は,ログフォーマット,delete.pl・delsetup.tmpl導入,他少し。
ログフォーマットも大体固まったので明日あたりにiswebにサンプル置きます。

--
>45 >>58
HTML書き出し式カウンタを使ってるんですか?
実際に使うには,普通の,カウントを別ファイルに持つ形式より
危険な感じがするんですが,利点とかてありますか?
煽りとかじゃなくて,純粋に気になったので。

00626101/10/19 07:04 ID:???
>>61
SSI使えないサーバでも使える。ってのがたぶん利点。
それ以外では使う理由ない。
あ、あとはカウンタ表示自体ではCGI起動しないってのもかな。

00636201/10/19 07:15 ID:???
あれ、すみません、俺は61じゃない。

>>62
このカウンタって
・htmlにアクセス・表示
・IMG経由でCGI呼び出し
・htmlを解析してカウンタ部分を加算
・html書き出し
という方法ですよね?

これだと以下みたいなのと比べると,
毎回htmlを書き出すんで負荷やあぼーん率が高くなりそうと思って。
・cgiにアクセス
・index.tmpl読み込み
・count.dat読み込み
・カウント
・index.tmplの特種タグ(0<!-- __%%COUT%%__ -->とか)置き換え
・count.dat書き出し
・print

うー,ちょっと混乱してます・・・

えっと、
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でないのデス。

truncate ってどんな実装よ?
>truncate DAT,length($count);
ここで小さくなったりしないのか、、しないよな、うーん。

0067ちんげん01/10/19 19:25 ID:???
おおお、しばらく見ないうちにおいらの分からないエリアに入ってる...

これを作ったのは、某所で、CGIのテキストカウンターってないの?
という話があったからなんです。で、んじゃ作るかと思って作ってみた
ものなのですが、いやぁ、おのれのあまりの未熟さを痛感しました。

なんか場違いでスマソ。 >1,ALL

>>66
カウントファイル的には桁数が前より小さくなることは無いので、
truncate DAT,length($count);では小さくならないね。
ってことは truncate かける意味も無いけど。


0070101/10/19 21:45 ID:???
>>65 ありがとう。なんとなくわかりました。
>>67
ぜんぜん場違いでないと思いますよ。
スレが活発化しました。

>>65のソースキボン、、イマイチ解らん    鬱

>>69
それ、なってない。

>>69
<counter></counter>なんてワケのわからないタグを使用している時点でアウト。
仕組みは同一だし。

+> 使ってるのなんて始めて見た。
しかもこの場合意味無いどころか、いったんtruncateされるので
タイミングによってはindex.htmlが正常に見られない。

お、何か盛りあがってますネ
良く考えたらアプ板なんでボクもあげましたヨ >>71
>>53さんのが入ってるでス
flockコメントアウトしたりしていぢめてみてくださイ
調子にのるとカーネルらー に突っ込まれそうなのでこの辺で退散   ササッ(((・∀・;)

http://isweb36.infoseek.co.jp/computer/perldev/cgi-bin/upload/source/017.txt

ところで>>1よ。
アプロダの
A:hover {color: red; font-weight: bold;}
このドキュソスタイル指定を消してくれ。マジウザイ。

カーネルらー、ってなーに??

>76 了解。消しました。
--

あぷろだ,テスト設置してみました。
iswebなので,コピペで飛んでください。
ttp://isweb36.infoseek.co.jp/computer/perldev/cgi-bin/tiny_upbrd/upload.cgi
まだ拡張子の判定がイマイチです。

0079101/10/20 03:38 ID:???
>78=1
拡張子指定できるようにしました。
http://isweb36.infoseek.co.jp/computer/perldev/
からもいけます。

008071 01/10/20 15:57 ID:DdyXBwQg
>>75
これ良いな、ちょっとflock外して5万回位叩いてみたけどHTMは勿論カウンタデータも飛ばないよ
良く考えたらとびようが無いんだな。syswrite使っとけばより安心って所かな?
俺の使ってる所時々ファイルが飛ぶから、上のKY何とかみたいなのは怖くて使えないんだよ
俺もアクセス解析とか要らない派だから外部ファイル無いのも気に入った
ちょっと弄って使わせてもらうよ THANKS!!

>>80
flockしなかった場合に本当に常に1ずつインクリメントされるかどうかは疑問。

疑問って・・・される訳ないだろ  藁

0083名無しさん@お腹いっぱい。01/10/20 16:58 ID:WoA8FLwb
>>80
5万回つーても、同時アクセス数いくつに設定?

0084ちんげん01/10/20 17:13 ID:???
先生!出直してきました。
また見てやってくださいませ。

http://isweb36.infoseek.co.jp/computer/perldev/cgi-bin/upload/source/018.lzh

008571 01/10/20 17:32 ID:???
何っつーか、、
>>81 やってみれば?
>>83 5万回÷俺の環境で許されるほぼ最大のプロセス数だけど?、
つーか君はディスクアクセスなんてオーバーヘッドの馬鹿デカイ処理に対して
単にローカルでforすりゃ十分って事が分からないのかい? 

まー良いや取り合えず>>75 有難う!

00868301/10/20 17:57 ID:???
>>85
いやーん怒んないで。Apacheのおまけについてくる
abコマンドでベンチマークとったのかと思ったんですよう。

00877101/10/20 18:52 ID:???
あ、こっちもスマソ fork×50でtrigger.plをexec trigger.plで1000forて感じ。
これ以上はNTだとヤバイから、ローカルはIISだからabコマンドは解らないよ
HTMをパースしてそこだけ書き換えるってのが、本物SSIっぽくて
ちょっと良いなと思っただけ、別に飛ばない方法なら幾らでもあるし
と言う事で外野は去る事にする。

00888101/10/20 22:05 ID:???
疑問っつうか、されない事わかってて言ってますよ:-)

0089名無しさん@お腹いっぱい。01/10/20 22:14 ID:lWm0+PHj
ゴミどもめ。
早く死になさい

(´-`).。oO(また変な流れになってきたね・・・)

わかってて疑問なのかよっ!!

>>84
取り合えずCGIならdieは辞めとけ、エラールーチン書いてそこに飛ばせ
ただ例えばファイルが100kbだとして、書き換えたいのは20バイト足らずなのに
毎回全部書き直すってのは効率はよろしくないってこった、
その程度の効率は俺は気にしないけどな、それが嫌なら75のをパクれ

100kbのHTMLファイルなんてヤダ!(いや、わかってるよ

0094101/10/23 02:28 ID:RBVSiDON
あぷろだのネタが思いつかなくなってきたので,XBM表示CGI作りました。
<IMG src="xbm.cgi?100">で100と表示します。
サンプルは
http://isweb36.infoseek.co.jp/computer/perldev/cgi-bin/print_xbm/view.cgi
です。

□と■の文字列から画像データを生成するようにしてみしたが,
変換処理,ごちゃごちゃして少し読みづらくなっちゃいました。

0095仕様書無しさん01/10/27 23:41 ID:YdPss8Pv
(´-`).。oO(移転あげなの・・・)

0096101/10/28 00:59 ID:???
>95
ありがとです。
今ちまちまとネタCGI(物語自動作成)作ろうとしてるんですが,
いきなりデータ形式でつまってます。
作ってみたいのいくつかあるんで,浮気しながらちょこちょこ書いてこうかと思います。

0097デフォルトの名無しさん01/10/31 21:41 ID:???
(´-`).。oO(ちょっと別スレで使わせてもらっちゃった・・・・ダメ? )

0098101/11/02 04:59 ID:/ySb/MGF
>>97 全然問題ないです。そういう意味もこめて置いたので。

--
改造工房用にアプロダ置いたら,どのくらい利用されると思いますか?>ool

>>98
ログ設定を大きくしていると利用されやすいかも。
すぐに流れると、投稿する方も閲覧する方もツマンナイし。
(ぁゃιぃ風味は止めた方が良いですよ)

0100101/11/03 04:40 ID:???
あぷろだ v0.1.2をあげました。
>>1 からいける,「あぷろだテスト」のほうです。
CONFIGとテンプレまわりいじって,CSS使ってみました。

0101101/11/03 23:46 ID:kIdT+u23
あぷろだ v0.1.2.1をあげました。
最適化とバグとりです。

複数ページ化をどうやるか考えてます。

0102名無しさん@お腹いっぱい。01/11/05 17:00 ID:LgoarrLr
>>101
v0.1.2とv0.1.2.1を展開するとupload.cgi.binのようなファイル名になって
各ファイルにバイナリっぽいヘッダが付いてるんだけど、
もっかいアップしなおしてもらえませんか?

0103101/11/05 17:27 ID:???
あっ,すいません,MacBinaryで圧縮かけちゃってました。
0.1.2.1あげなおしました。
多分これでおけだと思います。

0104101/11/07 07:22 ID:p5r/Tumr
複数ページ化したv0.1.3,あげて設置しました。
>>1 からいける,「あぷろだテスト」です。

0105名無しさん@お腹いっぱい。01/11/08 03:07 ID:LQlTaHHV
初心者スレで教えてもらったのを忘れないようにと
vars.pmいじってglobal.pm作ってみました。
グローバルな変数とかをシミュレートします。

マッタリ上げ♪ (・∀・ )
今一盛り上らないのはCGIの悲しい所かな、、、
Cと違ってperlは関数に千切りすぎると極悪に遅くなるからねー
今Socketで遊んでるから、LWP::Simpleもどきでも出展してみようかしら w

0107101/11/15 14:16 ID:ra8XDH7X
ログファイルをモジュール使ってうまく管理できないかと
オブジェクト指向のを調べてましたが,なかなか難しいです。
DBやTieのやり方が関係あるのかな。

>>106
分割してくと遅くなるんですか。今まで千切りまくってました(^^;
Socketとかさっぱりわからないので,ばりばり使ってる人を見ると
すごいなぁと思います。

0108101/11/19 11:59 ID:???
>107 のモジュール考えてたら,あぷろだにバグ見つけました。
ロックがかかってるようで全然かかってません。
修正は少し手間取りそうです。

設置方法がわからない

えと,あぷろだなら,新しいCGI.pmとHTML::Template.pmをパスの通った適当なところに入れて
パーミッション設定して,upload.cgiの1行目のパスを変えて,
2〜16行を削れば動くはずですが,自信無いです。

Perl勉強中の素人が書いたのでバグ入り低機能・高負荷です。
今フォームデコードも単体でできるようにと いろいろ書き換えてますが,手間取ってます。

0111 02/01/01 12:05 ID:+ymJLOJv
解凍の仕方がわかんない

↑ 生きる価値ゼロ v(^v ^*

死に方がわかんない

0114 02/01/03 03:44 ID:yfnaT3pD

0115よしだみつお02/01/03 09:08 ID:???
『改造クン』とかいう共産主義者で偏差値80以上の高校生(現在2チャンネラー)の
クソガキが運営している最低なHPスペースです。
ユーザーの事など全く考えずに、こづかい稼ぎだけが目的で営利主義に走ってやがります。
天罰を与えてやりましょう!!
イタズラ登録をしまくって下さい。悪用しちゃってもいいですよ!!
鯖に負荷かけまくって責任とらせるってのも面白いかも(プ

http://k-server.org/ http://k-server.org/ http://k-server.org/
http://k-server.org/ http://k-server.org/ http://k-server.org/
http://k-server.org/ http://k-server.org/ http://k-server.org/
http://k-server.org/ http://k-server.org/ http://k-server.org/


この文章のコピー・転載を歓迎いたします。

0116名無しさん@お腹いっぱい。02/01/03 21:12 ID:nWDcFjev
>>115
よくも飽きずに自作自演してんなぁ。

0117名無しさん@お腹いっぱい。02/01/04 00:44 ID:ZDJ61sb3
>>92
あとあれです。
openの後のdieは、||ではなく、or dieを使うことが推奨されています。
(らくだ本では。perlfuncにはその記述はありませんね)
いずれにしても、処理に失敗したらエラーメッセージを出す仕組みは
必ず必要になるので、簡単なスクリプトであっても、
用意して置くに越したことはないと思います。

>openの後のdieは、||ではなく、or dieを使うことが推奨されています。

その根拠は?、優先順位理解する方が大切じゃないかと思うが
是非説明おねがい

>118
>その根拠は?
当ててみな( ゚Д゚)y-~~~

評価順位知らない馬鹿がカッコ外して嵌るから ヽ(´ー`)ノ

浮上

0122名無しさん@お腹いっぱい。02/01/09 23:53 ID:IrymNKBw
JavaのInterfaceをヒントにInterface.pmを作ってみた。
ホントはMLに投稿しようと思ったけど、
急に2週間ほどネットに繋げないことになったんでここで。
全然磨いてないけど着眼点は悪くないと…自分では思う。

>>122
5.6入れてないんで動かなかったけど
これを使うとメソッド名の統一ができるのかな
最近メソッドの命名に悩んでたので参考にさせてもらいます

0124名無しさん@お腹いっぱい。02/01/11 15:24 ID:FU5QMXGq
>>115
偏差値なんて相対的な物だから自慢したいならまず偏差値80を出した
テストを明らかにしてね。

テストを明らかにしても意味は無い (笑

0126名無しさん@お腹いっぱい。02/01/12 15:26 ID:Ca0kINDV
あげ〜

0127 ◆RUwjICBI 02/01/16 17:39 ID:???

あぷろだ1.01。
HTMLソースの下の方にベンチマークを書き出すようにしました。
Logs.pmを使ってログを管理するようにしました。

まだ中途なのでsage。

0129名無しさん@お腹いっぱい。02/01/28 07:41 ID:U2Qq819d
名前も保存されるようにするのってFTP機能じゃないとダメなのかな

?別にリネームしなければいいだけでろ?
穴だけど

0131名無しさん@お腹いっぱい。02/01/28 19:54 ID:Vj1E59E1
あぷろだなんだが、{}で囲ってなんかやってるとこあるじゃん。 { # ○整形
みたいにね。
ここはさ、メソッドとして抽出したほうが見通しよくなるとおもうんだが、、、

0132名無しさん@お腹いっぱい。02/01/28 20:57 ID:U2Qq819d
>リネームしなければいい
もれじゃできねえから、できたらだれかやってくれ

ユニークである必要があるし、このままでいいだろ。
コメントをちゃんと書けば不便じゃないさ。

>>133
サーバに保存されるファイル名と、ダウンロードされるファイル名は
一緒である必要はないから、OKと思う。
ただ、ダウンロードのためだけにCGI起動させるのはアレなんで、
mod_rewriteとか通してやれば素敵になりそう。

0135102/01/29 14:22 ID:???
>>131
 ありがとうございます。
 あのあたりはごちゃごちゃしてるので なんとかしたいと思ってるんですが,
分けようとしても速度遅くなるわ変数のやり取りが見辛くなるわで
うまく書けなかったのでああなってます。

 ああいう切り分けとかをサクっとできればいいんだけど,
時間かけて悩んでる割に大したモノが書けない・・・

0136名無しさん@お腹いっぱい。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とかないと怒られた。

0137102/01/29 16:59 ID:???
>>136
ありがとうございます。
CGI.pmは2.47からupload()や cgi_error()が実装されたようなので,
2.47以上が要ります。 開発では2.78使ってます。
前はバージョン指定してましたが,書き換えた時に消しちゃったみたいです。

0138名無しさん@お腹いっぱい。02/01/29 17:34 ID:7v+0Ir29
依存しているモジュールとバージョン、そのモジュールが取得できるURL あたりをドキュメントに書いといてもらえるとうれしい。

iswebは5.6.1かぁ。。。5.005_03ってもう古いのかな。

0139名無しさん@お腹いっぱい。02/01/29 19:04 ID:9LBydpPt
>138
Perlの作者タンが、5_005_03なんてつかってちゃいやぁん
ていってるよ??
なんかセキュリティ的にもよろしくないそうです。

そうなのか。じゃあ漏れも5.6.1に移行しよっと。

>>139
ソースきぼんぬ。

「セキュリティ的によろしくない」の部分をもっと詳しくキボンヌ。

>141-142
て・め・え・で・し・ら・べ・ろ(・∀・)

0144名無しさん@お腹いっぱい。02/01/29 21:23 ID:9LBydpPt
ていうか、俺も出自忘れちゃった。
エラソーニイッテゴメソヨ(・∀・)

Perl5.6.1のドキュメントの日本語訳のサイトの端書きの
作者の言葉の部分、あそこだったと思います。

0145142 02/01/30 00:49 ID:???
いえいえ、ボンクラ厨房の分際で高貴なる2chBBSに書き込んでしまって
申し訳御座いません。
所で少し疑問なのですが「出自」って何ですか?

出典 と
辞典 を
脳内合成して
出自 になるんでしょうか?

なんて読むのこれ「でぢ」?

0146102/01/30 01:28 ID:???
>>138
今回も次のまで時間かかりそうなので,とりあえずですが
必須らしい環境を書いておきます。
perl5.005

CGI.pm 2.47
http://search.cpan.org/search?dist=CGI.pm
解説: http://member.nifty.ne.jp/hippo2000/perltips/Cgi.htm

HTML::Template.pm
http://search.cpan.org/search?dist=HTML-Template
解説: http://member.nifty.ne.jp/hippo2000/perltips/html/template.htm

KCatch.pm #use CGI::Carp 'fatalsToBrowser' で代用できるかも
http://www.kawa.net/works/perl/catch/
解説: http://www.kawa.net/works/perl/catch/KCatch-j.html

>>145
>所で少し疑問なのですが「出自」って何ですか?
どういう風に笑って欲しくて書いたのか教えてくれ。

>>147
あ、笑って欲しかったのか。
思わずマジレスしそうになっちゃったよ。
ごめん。

0149名無しさん@お腹いっぱい。02/01/30 03:16 ID:CYuhEnG/
>145
gooで「出自」調べて読むか、自分なりに読んだらいいよ。
「浜崎あゆみ」って読もうと「田中真紀子」って読もうと「ムネヲ」って読もうと
奇異の自由だよ。

ようするに、>>145はボンクラ厨房未満だった、、と。

>150
何怒ってるの?

>>151
どこを見れば怒ってるように見えるのか問い詰めたい。

>>149
http://dictionary.goo.ne.jp/cgi-bin/dict_search.cgi?MT=%BD%D0%BC%AB&sw=2

gooで引いてみたよ。

しゅつじ 【出自】

(1)でどころ。うまれ。出所。
(2)文化人類学で、個人が生まれた時から認識される系譜関係。血縁。「―集団」

自分の知らない単語=造語
って思ってる緒ヴァカさんがいるスレはここですか?

multipartデコードを自力でやろうとしましたが,
把握できなくなってきたので,CGI::Minimalを試してみてます。
時間がたっても楽に読めるように書くのって難しいです……

0156あぷろだ02/02/07 03:37 ID:4ZCZT+Ah
あぷろだ v1.02上げました。
何回も見直してバグは無いはずなんですが,
ポカしてるんじゃないかとちょっと不安です。

変更点は以下のとおりです。
・package uploader; と明示するようにした。
・CGI.pmをやめて CGI::Minimalを使うようにした。
・環境に依存する設定は setenv.plで行うようにした。
・使用スクリプツを ./lib/以下に移動した。

HTML::Templateと CGI::Minimalが必要です。
KCatchも使ってますが,これは使わなくてもいいです。
http://search.cpan.org/search?dist=HTML-Template
http://www.nihongo.org/snowhare/utilities/modules/cgi-minimal/
http://www.kawa.net/works/perl/catch/KCatch-j.html

使ってる CPANモジュールも,あぷろだとまとめて上げたほうがいいですか?

0157nobodyさん02/03/21 20:11 ID:???
ファイル名保持機能つけて

0158nobodyさん02/04/09 22:18 ID:RNJ4fGuJ
誰か人工無能付きのチャット作って〜

0159nobodyさん02/04/09 23:03 ID:???
>>157
じゃぁ人口無能エンジン作って。

0160nobodyさん02/08/23 00:01 ID:mZ+fotXI
age

0161山崎渉03/01/15 13:50 ID:???
(^^)

0162山崎渉03/03/13 17:54 ID:???
(^^)

0163山崎渉03/04/17 12:13 ID:???
(^^)

0164山崎渉03/04/20 06:20 ID:???
   ∧_∧
  (  ^^ )< ぬるぽ(^^)

0165山崎渉03/05/22 02:20 ID:???
━―━―━―━―━―━―━―━―━[JR山崎駅(^^)]━―━―━―━―━―━―━―━―━―

0166山崎渉03/05/28 17:10 ID:???
     ∧_∧
ピュ.ー (  ^^ ) <これからも僕を応援して下さいね(^^)。
  =〔~∪ ̄ ̄〕
  = ◎――◎                      山崎渉

0167山崎 渉03/07/15 11:24 ID:???

 __∧_∧_
 |(  ^^ )| <寝るぽ(^^)
 |\⌒⌒⌒\
 \ |⌒⌒⌒~|         山崎渉
   ~ ̄ ̄ ̄ ̄

0168山崎 渉03/08/02 02:29 ID:???
   ∧_∧
  (  ^^ )< ぬるぽ(^^)

0169ぼるじょあ ◆ySd1dMH5Gk 03/08/02 05:02 ID:???
     ∧_∧  ∧_∧
ピュ.ー (  ・3・) (  ^^ ) <これからも僕たちを応援して下さいね(^^)。
  =〔~∪ ̄ ̄ ̄∪ ̄ ̄〕
  = ◎――――――◎                      山崎渉&ぼるじょあ

0170山崎 渉03/08/15 23:26 ID:???
    (⌒V⌒)
   │ ^ ^ │<これからも僕を応援して下さいね(^^)。
  ⊂|    |つ
   (_)(_)                      山崎パン

0171電脳プリオン04/07/19 17:59 ID:???
まだ開発してますか?

0172nobodyさん04/07/22 13:06 ID:???
                  _,..-‐‐-..,,_
    _,,.-‐‐-..,,,        ,r':::::::::::::::::::::ヽ
  ,r':::::::::::::::::::::::ヽ      /:::::::::::::::::::::::::::::ヽ
 ./::_;;;::;;;_::::::::::::::::;;l//-‐-‐;l;;::::::::::::::;;:-‐‐--:;;l
 l/~   ~ヽ::::::::::::::::::::::::::::::::::::::::::::;r'彡     l
 l     ヾ/   :::::::::::::::::::::::::::::::::ヽ     /
 ゝ    /      ::::::::::::::::::::::::::::::ヽ  _,,-''
  ~'‐.,,,,,_l /て^ヽ      ,;;r=i≦;;:::ヽ'~     
      l |o ゝ,_ノ|     ''~      _l.    
     .l ヽ( )_,,ノ  `'      _,,..-‐''',,,l,   
     l_,,,,,,_   (__人__ノ    __,,,,,r'::::::l   
     ̄l_,,,.    ヽ:::::::l     ,r'~ ゝ;ノ  
     -''ゝ、 ,,,   ゝノ        /     
        ''r':::ヽ           /     
        ゝ;;ノ          ヽ     
        /             'l      
        l              l
        ゝ             ./
        /^'‐-t''''○ ○~^''''t-‐^ヽ
        ~‐‐'~   ∪    ~'‐‐~


0173nobodyさん04/07/27 20:10 ID:???
  __,冖__ ,、  __冖__   / //  ,,,..-‐‐‐-..,,,
 `,-. -、'ヽ' └ァ --'、 〔/ /.  /::::::::::::::::::::::::ヽ        _,..-‐‐-..,,,
 ヽ_'_ノ)_ノ    `r=_ノ    /  l::;;-‐‐-:;;::::::::::::ヽ//-‐,,__ /:::::::::::::::::::::ヽ
  __,冖__ ,、   ,へ    /  ,ィ l:l    ヽ:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::ヽ
 `,-. -、'ヽ'   く <´   7_// ヽ   /   :::::::::::::::::::::::::::::::::::::;-'^~~^'‐;;:l
 ヽ_'_ノ)_ノ    \>     /   ~ヽ/      :::::::::::::::::::::::::::::::ヽミ   .ll
   ll     || .,ヘ   /      / / ̄^ヽ   ::::::::::::::::::::::::::::ヽ  ,.ノ
   ll     ヽ二ノ__  {      /  |  ・ .|     :/ ̄^ヽ:::::::l'^~
   l|         _| ゙っ  ̄フ ‐/-,, ヽ,_,,ノ      |  ・  |:::::::l
   |l        (,・_,゙>  /   l  ~^''     `‐'   ヽ.,_,,ノ  :l
   ll     __,冖__ ,、  >  '''l^^~~~     / ̄ ̄ヽ    -‐‐‐--l-
   l|     `,-. -、'ヽ'  \  ヽ、 ,,,,    | |||!|||i||!| |   ~^'‐..,,_/
   |l     ヽ_'_ノ)_ノ   トー   / (:::::}   | | |ll ll !!| |    ,,,, イ~'''
. n. n. n  __,冖__ ,、 |     l:  ~~   | |!! ||ll| || |   {:::::) ::l
  |!  |!  |!  `,-. -、'ヽ' i     l:       | | !   | l    ~~  l
  o  o  o  ヽ_'_ノ)_ノ  {.     l、      ヽ`ニニ'ノ       ,l>
             /     /^‐-,,____,,,,,,,,..................,,,,,,,__,,,.--ヽ
          ∨⌒       ~‐‐'~             ^'‐‐~

0174nobodyさん04/08/23 16:05 ID:???
22

0175nobodyさん04/09/11 01:02:49 ID:???
age

0176nobodyさん2008/01/06(日) 14:07:38 ID:???
電脳プリオン どこにでもいるなw

0177nobodyさん2008/07/10(木) 07:38:34 ID:???
教えて

0178nobodyさん2009/09/07(月) 19:11:43 ID:???
>>177
なにを?

0179nobodyさん2011/10/30(日) 21:19:02.02 ID:a5tcCwva
⊂二二二( ^ω^)二⊃ブーン

0180 ◆SlaMEA0byM 2012/06/05(火) 18:30:10.34 ID:???
test

  ∧_∧
  ( ・∀・)      | | ガガッ
 と    )      | |
   Y /ノ      .人
    / ) .人   <  >_∧∩
  _/し' <  >_∧∩`Д´)/
 (_フ彡 V`Д´)/   / ←>>164
            / ←>>168

0182nobodyさん2014/08/10(日) 11:09:15.05 ID:shcJ/vwI
★2ch勢いランキングサイトリスト★

☆ +ニュース板
・ 2NN
・ 2chTimes
☆ +ニュース板新着
・ 2NN新着
・ Headline BBY
・ Unker
☆ +ニュース板他
・ Desktop2ch
・ 記者別一覧
☆ 全板
・ 全板縦断勢いランキング
・ スレッドランキング総合ランキング
☆ 実況板
・ 2勢
・ READ2CH
・ i-ikioi

※ 要サイト名検索

0183nobodyさん2017/03/04(土) 23:40:16.27 ID:???

0184nobodyさん2017/03/04(土) 23:42:39.32 ID:???

新着レスの表示
レスを投稿する