【Perl】掲示板を使ろう！

-前スレッド　http://tako.2ch.net/...&key=959378033&ls=50
-ＰＨＰ版　　http://corn.2ch.net/...&key=982779383&ls=50

今のところのまとめ。
■ほういち氏
　　▽サンプル掲示板
　　　　http://www13.big.or..../~bell/nanashi/perl/
　　▽ソースコード
　　　　http://www13.big.or....~bell/cgi-bin/files/
　　　　http://xbbs21.virtua...bbs/up/src/up010.lzh
■347氏
　　▽サンプル掲示板
　　　　http://takotubo.virt...ve.net/bin/board.cgi
　　▽ソースコード
　　　　http://xbbs21.virtua...bbs/up/src/up022.lzh
■570氏
　　▽サンプル掲示板
　　　　http://maasa.antique...ch/sample/index.html
■panton氏
　　▽ソースコード
　　　http://www.panton.f2...lib/IndexedFile.html
　　　http://www.panton.f2...b/IndexedFile.pm.txt

弐編氏はどうした(ﾜﾗ

ども。
俺のは下のURLに変えているので、
http://www.panton.f2...s/lib/IndexedFile.pm
訂正させてください。
一応説明させていただくと、
データファイルの高速ランダムアクセスを、
インデックスファイルにより実現するモジュールです。
データの要素にはハッシュが格納できます。
構想中のBBSシステム用に作った物ですが、汎用のモジュールなので、
使ってみてバグを見つけてくれるとうれしい。

暇だからpanton氏のも試してみるかな。
347氏もそろそろハンドルを名乗るのがいいと思われ。
ほういちさんの所は止まってるなあ・・・
570氏のはどうだろう・・・・
gunzipさん最近見かけないな。病院が忙しいのかな？

>>2
絶対要らない。
perl板の汚点弐編

使るに突っ込んでいい?

>>6
使る？

「作ろう！」だな・・・・
一体どんな打ち間違いをしたのか・・・

。。。。。。。コピペしたから気付かなかった。。。。。。

>>9
あう、重ね重ね申し訳ない・・・

誰もいないの？

>>11
(1) みんな黄金週間で遊びまわっている。
(2) 世間が黄金週間のうちに仕事の遅れをとりもどそうと必死。
私は(2)です・・・

>>12
頑張ってくだされ〜

>>4
名無しさんの逆ってのが良くてそのまま使ってましたが。。。
これじゃだめかな?

しばらくやれるかどうか。。。

>>14
なるほど・・・・言われてみれば確かに逆。
いやいやハンドルは何だっていいです。頑張って

■■■■■■■□□□□□□□□□□□□□□□□□□□
0　　　　　　20　　　　 　40　　　　　　60　　　　　　80　　　　　　　100

■終わった
-IxAccessFile.pm （ログ、スレッド管理の入出力関係用）
-Article.pm （各投稿記事用クラス）
-post.cgi (1スレッド用・・・極めていいかげん)
-rm.cgi （投稿者/管理者記事削除）

□手を付けてない
-投稿制限 #後回し
-記事訂正 #コレは簡単
-admin.cgi （そのまま） #面倒くさい
-setup.cgi （そのまま） #たぶん要らない
-post.cgi (複数スレッド用) #時間無い

▽あるといいな（なくてもいいな）
Storable or FreezeThaw or Data::Dumper
▽気が向けば
-tmpl_parse.pl （テンプレートファイルからコードを書かせ・・・たいなあ）

#コメント
入出力関係のは出来ているので（一応）、後は割とラクダと思う。
GW殆ど（というか全く）休めず、時間が全くとれないので捗らん（ぐは）

>>panton氏
=line 248
>my $pointer = $self->_getpointer($id);
この部分は不要ですよね。既に$idからファイル内の位置が得られているのですから。
----------
あと、ドキュメントのBUGSとTODOに記載されている各項について
（"バリューに改行が入っているデータは扱えない。"・・・とか）
何か書こうかと思ったけれど・・・ちょっと後回しにします。
#「配列、スカラーへの対応」とかはどうするのかなあ・・・と興味が。

248->253 だな。はぁ

みんな死んでる...........................................

0

>>17 _gunzip氏
（248行目でしたが・・）確かにそうですね。修正します。

> （"バリューに改行が入っているデータは扱えない。"・・・とか）
> 何か書こうかと思ったけれど・・・ちょっと後回しにします。
> #「配列、スカラーへの対応」とかはどうするのかなあ・・・と興味が。

うーん、考えどころです。
StorableとかFreezeThawとか使っちゃえば、必然的にそこらへん
全て解決するし、もっと言えば、メッセージオブジェクトとか
突っ込んじゃえばさらに楽だよなぁ・・・とか。

皆さん忙しいんでしょうね

age

そして誰もいなくなった

age

終わっちゃダメェ！！！！

長らくご愛顧頂き誠にありがとうございました。

＝＝＝＝＝＝＝＝＝＝＝終了＝＝＝＝＝＝＝＝＝＝＝

>>29 age

気を取り直して
=======================再開============================

特に2ch型とかにしなくてもいいから、とりあえず基本中の基本、
みたいなシンプルなヤツを誰か書いてくれんだろうか…
Perl上手い人ほど、わざわざシンプルなのって書かないんだよね。

いつぞやの七行BBS
#!/usr/local/bin/perl
%f=map{tr/+/ /;s/%(..)/pack("H2",$1)/eg;s/</&</;s/>/&>/;$_}split/[&=]/,
$ENV{QUERY_STRING};$f{n}||="名無し";open F,"+<bbs.dat";flock F,2;$e=
"$f{n} &>$f{m}<BR>\n"if($f{m});@e=($e,<F>)[0..20];seek F,0,0;print F @e;
print"content-type: text/html\n\n<title>BBS</title><h1>BBS</h1><form
action='bbs.cgi'><p>名前<input name=n value='$f{n}'><br>記事<input name=m
size=50><br><input type=submit></p></form><hr><p>@e</p><hr>";
__END__
>>32
シンプルだぞ(笑)

>>33　そのスクリプトすごい好き。７行なのに名無し機能まである。

>>33
元スレの25だけど、無駄なファイルアクセス避けるためには、
$e="$f{n} &>$f{m}<BR>\n"if($f{m});@e=($e,<F>)[0..20];seek F,0,0;print F @e;
は、下みたいにしたほうがいいかもね。
@e=<F>;if($f{m}){seek F,0,0;print F @e=("$f{n} &>$f{m}<BR>\n",@e)[0..20]}

>>35
なるほど。発言があったときのみ書き込むわけですね。

ぢつは33=元スレの20だけど、こりゃ20原案25作成ですね。
フォームの解析なんてホント目から鱗でした。
マジ勉強になります。

>>33
それ、ｽｺﾞｰｸ好きなんだけど、もうちょっと何か…(;´ー`)y-~~
でも勉強になりました。

Tiny BBSでいいじゃん？
http://yasu.asuka.net/soft/tinybbs.html

なんか7行見て引いちゃったんだけどさ
漏れみたいな素人がminibbsパクッタのでもいいかい？

>>38
誰か、Tiny BBSのソース上げておくれ。

>>40
なんで？落とせないか？

mx使って認証してるのか？
@以下のアドレスを@geocities.co.jpとかでDLしろよ

FTP ソフトで入れ。

>>39
use strictな掲示板ならどんなんれもいいのれすー

panton氏のIndexedFile.pmを見ましたが、いいですねぇ。
BBSを作るのがかなり楽になりそうです。

恩恵に預かるだけでは良くはならないので、
ソース中で幾つか気になった点を書いておきます。


* line 154
これは
sub articles{ return @{ $_[0]->{_idxlist} } }
でいいのではないでしょうか。

* IO::File
IO::Fileはかなり大きいので使わずに済ませてもいいのでは？
CGIスクリプトとしての動作が前提なので、軽くしてまずいという事は無いかと。

* "$_"
気付いておられると思いますが、
所々暗黙の$_を使用していますね。
これもついでに。

>>45
素人&場違いで悪いんだけど
$_って駄目なの？

>>46
いや、$_がダメってことは無いですよ。
ただ使うならばlocal宣言して欲しい…ということです。

# 消えるとまずいデータは極力$_に入れないようにしてはいますが

>>47
そういう意味なんすか
サンクス

>>47
確かにそれ関係でばぐった時はちょっとやっかいだった

ほういち氏は何処行った？

ＰＥＲＬなんて奇特なもんしりゃーせんです、ハイ。
知ってるのは“ＲＥＭＥＭＢＥＲ　ＰＥＡＲＬ　ＨＡＢＯＲ”くらいッス。

www.tripod.lycos.comとかはどうやって ウェブサイトや掲示板を作るかよくわかりません。
とりあえずトライポッドに無料サイトを開設して掲示板を設置したいのですが、
ウェブ作成関連のプログラミングにめちゃ詳しい方教えてください。
メモ帳でｃｇｉファイル？を作ってアップする？とか意味がわかるようでわからないです。

>>51 死ね。

＞ウェブ作成関連のプログラミングにめちゃ詳しい方教えてください。

ﾌﾟ

>>51
知らなかったら勉強しろ。
ここでも逝け。
http://wakusei.cplaza.ne.jp/twn/

ﾈﾀﾆﾏｼﾞﾚｽｶﾅ

いま掲示版作っています。

データファイルをCSVに使用と思ってるのですが、CSVって、クオーテーションマークだけをエスケープすれば委員ですよね。
あと、CRとかLFとかもエスケープしたいのですが、どうすればいいですか・?

<br>に変換するにはあんまり美しくない気がして。

うん

>>55
パーサの仕様によっては、カンマもエスケープの必要有りでは？

>>55
CRLFも、クオーテーションマークでくくれば、
エスケープの必要なし。

惜しい、もうすこしでIDがBASICだったのに…

>>58
ただのBASICではなくてHu-BASICだというところが泣かせる。

>>58
改行はだめだろ、レコード区切りだから

ところで、CSVの仕様書ってどこかにあるの?

CSVについて
" " で囲みさえすれば、エスケープする必要があるのは、" 自身だけではないのでしょうか。

掲示板のデータファイルを考えているのですね。
CSVのモジュールを使えば、そんなこと考えなくてもいいのでは。

あぼーん

uzee

>>45 rubbish_lister様
遅レスで申し訳ないです。

> * line 154
> これは
> sub articles{ return @{ $_[0]->{_idxlist} } }
> でいいのではないでしょうか。

あれ？こうすると、配列でなくリストで返されて、スカラーコンテキストだと、
採用されるのは要素数ではなく最後の要素になっちゃうと思ったんですけど、
違うんですね。勉強になりました。
オーバーヘッド的にはどうなんでしょう？
挙動から予想すると、配列全部ではなく、
要素数が帰ってるみたいなので、大丈夫なんでしょうか？

IO:Fileはそのとおりです。
以前TODOに入れてたような気がしたけど、ないですね。TODOで。

$_ は個人的に混乱しない限り使わせていただきます。
Perl大好きっ子なんで。

初歩的な質問ですみませんが、
データファイルって、読み込みの時にもロックした方がいいですか?

それから、レスを多次元配列に入れてから書き出したいのですが、
配列全体のサイズが100KBとかになっても問題ないですか

>>68
おれはflockが使えるときは読み込みのときでも
flock(FILE, LOCK_SH) ってやってるよ。
ただしsymlinkを使ったりする場合は読み込みではロックしない。

配列サイズは、サーバのメモリ容量とアクセス頻度を考慮して
判断すべきだから一概にいえないけど、
うちの環境では100KBならまず気にしない。1MBだと気にするかも。

>69
気にしてください、お願いします

専用鯖なんじゃないの?
共用鯖だったら締め頃したくなるところだが

>>70
そっか、そうすると
たとえばデータファイルで100行分、まあ、レス100を表示するとすると、
データファールから1行読み込んで、書き出し、1行読み込んで書き出し
みたいにするのが現実的ﾃﾞｽｶ。

たとえばスレッドID、はじめのレス番号、最後のレス番号を与えると、
そのレスの内容を配列で返す。みたいな関数を作って、というのが楽そうだったのだけど、
あまりおすすめできないと言うことですね。

そうすると、>>69はファイルロックの話も含めて、ネタか？

>>73
ファイルロックは必要。しないとログファイル壊れるよ。

更新時に、

lock
更新対象読み込み
更新対象変更
更新対象書き込み
unlock

すれば、壊れないよ。
ただ、更新中に読む奴がいたら表示は狂う。

いちばんいいのは、全部一時ファイルに書き出して一気にrename。
これなら事実上ほとんど表示も狂わない。
ただ、読み込みアクセスが多いと更新失敗する確率は高くなるけど。

オヒザシブリデゴザイマス
IndexedFile.pm を更新しました。
http://www.panton.f2...s/lib/IndexedFile.pm
http://www.panton.f2...lib/IndexedFile.html

IO::Fileの使用廃止と、色々バグ修正があります。
前のバージョンには重大なバグがありました。

見つからなかったってことは、全然使われてねーんだな。
っと思って、手抜きテスト用ボードなんか用意してみました。
http://www.panton.f2s.com/bbs/sbbs.txt
http://www.panton.f2s.com/bbs/sbbs.txt （ソース）

たいしてテストしてないのでまだバグあるでしょう、・・見つけてよーん。

ぶっ、やっちまった。
http://www.panton.f2s.com/bbs/sbbs.cgi
テスト用ボードはこちらでございます。

では二つ三つ.......。
--------------------------
キー名に英数字以外のものが含まれているとおかしくなりますね。
("@threads"とか"perl-user"とか。)
196行目の
>my %hash = ('DUMMY', split /^(\w+?):/m, readline($self->_dathandle));
を
my %hash = ('DUMMY', split /^(.+?):/m, readline($self->_dathandle));
にすれば回避は出来ますが...。
--------------------------
modify_row()使用時、更新されたデータは、
データファイルの末尾に追加+インデックス更新されるわけですが、
頻繁に同じ項目を更新するような場合、ファイルの肥大化が問題にならないかな....。

例えば、掲示板のスレッド毎に情報をハッシュの形で格納してある場合
%thread = (
    count => 77, #投稿数
    subject => "【Perl】掲示板を使ろう！",
    key => 988890976,
    server => "http://corn.2ch.net/",
    dir => "php"
);
投稿がある→そのスレッドの情報を取得( get_by_id() )→（何らかの処理）
→投稿数をインクリメント→スレッド情報更新( modify_row() )
Ex.
$thread = $logfile->get_by_id($id);
$thread->{ count }++;
$logfile->modify_row($id, $thread);
とすると、投稿の度にハッシュ$threadの内容は末尾に追加されるので
（スレッドの情報ログのサイズ） = ( （スレッドの情報サイズ） * （投稿回数） ) * （スレッド数）
になってしまいますね。

・・・と、ここまで書いたときにsynchronize()を思い出した....。
例えば、スクリプト側で
if( $thread->{ count }++ % 5 ){
     $logfile->synchronize();
}
としておけば問題ないね。

いくらかのパディングを余分に取っておいて、
更新された情報が元の場所に収まりそうならそのまま上書きし、
無理なら末尾に回す、とするのもイイかもかも。

あと、198行目の
>chomp $hash{$_} foreach keys %hash;
は、スライスで
chomp @hash{ keys %hash };
と書けたりします。（参考までに）

あっげ

はじめまして。現在機能優先で掲示板を作っていて、コードの
効率は後回し中なのですが、いくつか質問があります。

・一般ではOpenでテキストを読み書きするのが多いようですが、
（MINIBBS程度の規模でも）TieやDBOPENを使ったものが見かけないのは
なぜですか？負荷について問題があるのでしょうか？

・発言データに関して、追加書き込みモードを基本にしてもファイルロックは
必要でしょうか？またどの程度の堅牢性を期待すべきでしょうか？

・読み出しに関して、基本的なスクリプトでは@LINE＝<FILE>と
していますが、While(<FILE>)やその他の方法のうち、お勧め
なのはどれでしょうか？また、Seekを使った読み出しについて
教えてくださいませんか？

>>81
ageで書いてもいいんじゃないかと思うけどなんでsage？

> ・TieやDBOPENを使ったものが見かけないのはなぜですか？
> 　負荷について問題があるのでしょうか
掲示板の場合リニアなデータ構造が多いのでハッシュがメインの
タイは不向きといえば不向き。配列を結びつける事も出来るが、
インターフェイスが不完全。

> ・追加書き込みモードを基本にしてもファイルロックは
> 　必要でしょうか？
必要です。堅牢性についてはデータの重要性によります。

> ・読み出しに関して、基本的なスクリプトでは@LINE＝<FILE>と
>　していますが、While(<FILE>)やその他の方法のうち、お勧め
>　なのはどれでしょうか？
>>69あたりからを読んでください。
seekに関しては、固定長なら使えるけど、掲示板のように
データ長が不定なデータだと不向き。

そこら辺を解決するためにIndexedFile.pmを作ってるんですが・・・

>>82
age忘れです。

リニアな構造ということですが、発言IDやTIMEをキーにして
残りは従来のままスカラーでもよいと思ったんですが、、、。
負荷についてわからないというのは、ハッシュでは数百発言とも
なると負荷がかかるのかとか、あるいは値のサイズによって
負荷が変わるのかとかも考えたのですが。

追加書き込みモードについては、一般に恐れているのは
全部読み出し＞退避＋追加＞全部書き出しの過程での全データ
消失だと思うので、追加書き込みでの危険性があまり認識
できないのです。

>>83
リニアというのは、掲示板は発言の並びに順番があるということです。
TIMEなどをキーにしてkeysでsortなんかをすることも出来ますが、
DBMの起動オーバーヘッドなんかを考えると、
あえて使う必要も無いかなという程度です。
記事数や値のサイズによる負荷の増加は気にするほどではないと思いますが、
よく知りません。

ファイルロックについては、いろんなところで調べてみるといいと思います。
追記モードでも同時に起こると、ファイルの同じ位置に書き込もうとして
データがおかしくなります。

>>84
ありがとうございます。

あと他にも、疑問が生じたときに、理由は自分で考えてみたのですが
これでいいのでしょうか？

while (<FILE>)よりも@line <FILE>のほうが、読み込み時に
早くcloseを行うのでよさげ
・・・・＞読み込み時は共有可、書き込み時はどっちみちロック

ANHTTP環境ではflock不可
・・・・＞Renameロックかflockコメント化で我慢

全読み＞全書き込みvs追加モード
・・・・＞ファイルアクセスより管理性重視？

レスポンスお願いします。

特定の行を抜き出すとき、

$line = (<FILE>)[5];

っていう方法はどうなんですかね。

>>86
それは最悪でしょう。
そいういうものこそDB_FileのDB_RECNOを使うほうが良いと思いますがね。

なして最悪？

>>85
> while (<FILE>)よりも@line <FILE>のほうが
なんでそんな結論になったのか知らないけど、普通ダメ。過去ログ読めよ。
> ANHTTP環境ではflock不可
HTTPDとflockは関係ありません。
> 全読み＞全書き込みvs追加モード
質問の意味がわかりません。

なんか基本的なところがわかってないんじゃない？
CGI-MLとかの過去ログでも漁って勉強してきましょう。

>>88
全部読み込んでから[5]だけ残して他は捨てるっていう動作。

>>85
> while (<FILE>)よりも@line <FILE>のほうが、読み込み時に
> 早くcloseを行うのでよさげ
いくらclose()したって、ねぇ…。
89さんの言う通り、避けるべきかと。
「負荷」とか「メモリ」という言葉を（以下略

>>90
それは今になってみたら分かります。が、
初心者はこんなことを思っていたという、、、、。

＞> ANHTTP環境ではflock不可
＞HTTPDとflockは関係ありません。
御免なさい、WIN95＋ActivePerl+〜というべきでした。

＞> 全読み＞全書き込みvs追加モード
＞質問の意味がわかりません。
何で追加モードがあるのに、わざわざ全読み全書き込みするのか､という
ことです。

>>91
つまり貴方には「全読み込み+全書き込み」と「追加書き」が同じ様に思えると？
正直ワケ分かりませんが。

>>91
追加は追加。増える一方。
書き換えも行わない。

全読み全書きは、中途での処理の可能性を残している。
本当に全部書いてるのか？
加えて、書き換えてるんなら同じじゃない。

実際にテストして考えてから書き込んでくれ。

>>91
flockは evalかけろ。

（既存の掲示板スクリプトは）何で追加モードが・・・
ってこと？
そういうのばかりでもないし、そうする必要があるのかもしれないし、
ただ馬鹿なだけかもしれない。
どっちにしろ他人のスクリプトなんてどうで良い。

>>94
flockはevalかけるな。

.

>>95
納得｡ レス感謝

あとはレス行為に感謝

>>96 >>94
どっちなの

eval{flock(FILE,2)};
eval{flock(FILE,8)};
flockはevalをかければ非対応の環境でも致命的エラーにならない。

そんな貴方に
set PERL5OPT=-m-flock
flock.pmは自分で用意してね♥

>>100
その代わり実は効いていないのに気がつかない可能性がある

#!/usr/local/bin/perl
use CGI $a=new CGI;print"Content-type: text/html\n\n<form action=n.cgi>";
print"<input name=n><input name=t>\n";$n=$a->param('n'),$t=$a->param('t');
if($t){$t=~s/,|<|>|:/*/g;if(!$n){$n="名無しさん＠お腹いっぱい";}open(I,">>y"),print I"$n,$t\n";}
open(I,"y"),@I=<I>;for($i=$#i;$i>$#i-10;$i--){($j,$k)=split(/\,/,$I[$i]),print"<hr>$j: $k";}

5行

一時間で書いたから最低なソースだ。
素人丸出し。
でも一応動く。
動けばいいよね。
だめ？

？

あっ　掲示板か　ゴメ

age

#!/usr/local/bin/perl
use CGI $a=new CGI;print$a->header,"<form action=n.cgi><input
name=b><br><input name=c>";($b,$c)=($a->param('b'),$a->param('c'));
if($c){$c=~s/<|>|:/*/g;if(!$b){$b="名無しさん";}open(A,">>d");
print A"<hr>$b:$c\n";}open(A,"d");@e=<A>;@f=reverse(@e);print @f;

少しだけ短くなったかな？

なんかアドバイスきぼーん。
もっと短くしたいです。

CGI.pmをつかって「もっと短く」と言われてもなぁ…と思ってしまう。

#!/usr/local/bin/perl
use CGI $a=new CGI;print$a->header,"<form><input name=b><br><input name=c>";
($b,$c)=($a->param('b'),$a->param('c'));if($c){$c=~s/<|>|:/*/g;if(!$b){$b="名無し";}
open(A,">>d");print A"<hr>$b:$c\n";}open(A,"d");@e=<A>;@f=reverse(@e);print @f;

<form action=n.cgi> => <form> #actionはデフォルトで自分自身らしい。
名無しさん => 名無し #これはどうでもいいか・・・。
これで横に長いが何とか４行

どうでもよい話かもしれないが、actionは#REQUIREDです。

>>112
DOCTYPE宣言がない以上ほんとにどうでもよい話ですね。

#!/usr/local/bin/perl
use CGI $a=new CGI;print$a->header,"<form><input name=b>";$b=$a->param('b');
if($b){$b=~s/</</g;open(A,">>c");print A"$b";}open(A,"c");print<A>;

これ以上はむりかな。
だんだん飽きてきた。
つーかこんなのは掲示板じゃない。

何で止まっちゃったの？

>>113
一応補足しておくと、action が #REQUIRED である限りクライアントによってはうまく動作しないことがあるかも知れないという意味を含めていました。

JAPU死ね

>>117
いきなりなんなんだチミわ

JAPUさん、負けないで。

>>118
ただの夏房だから放置が吉。

沈みすぎなのでアゲ。

IndexFile.pm改め、IxFile.pmを作りました。
ハッシュだけでなく配列やスカラなどにも対応。
データ構造が変わったので、IndexedFile.pm とはデータ互換性なしです。
詳しくは、
http://www.panton.f2.../bbs/lib/IxFile.html
http://www.panton.f2...om/bbs/IxFile.tar.gz （ブツ)
http://www.panton.f2s.com/bbs/sbbs.cgi （テスト用掲示板）

何気にVerｱﾌﾟ期待してまっせ

http://script.lovely...+200108/01080035.txt
ほういち氏発見！連行せよ。

xxx

あ、ホントだ　(＾＾
開発に疲れちゃったんだろーなー

>>ほういち氏
八月半ばに他のQ&A-BBSでも見かけたよ。
でも2chにはこない…。

定期age

タイトルのtypo発見した、ちょっとトクした気分だ。。。

use base 'IxFile';で継承すると
殆どのフィールドを継承できない(フィールド名が_で始まっている為)のですが、
それは仕様ですか？

お、意外にも使おうとしている方が・・・
仕様と言えば仕様ですね。
お好みで適当に変えちゃってください。
ただ、今全面的に仕様変更考えてるので微妙です。
特に、インデックスの内部保持方法とその保存形式、
ハッシュや配列へのTieインターフェイスとかいろいろ。
仕事忙しいのでいつになるかわからないけど・・・
なんか意見あったら言ってください。

ナルホド。
弄り始めたばかりですし、特に今のところ意見は無いです。
応援してますんで頑張ってください。

age

あげとく。もう捨てられたスレなのか？

「〜を作ろう」っていうスレで何かが完成した験しは全然無いな。

# IxFile拡張
# IxFIle::clear - IxFileデータベースをクリアする
# $status = clear $ixf;
sub IxFile::clear{
my IxFile $self = shift;

$self->_initialize(2);

$self->{_pointer} = 0;
$self->{_stat} = 0;
$self->{_idxlist} = [];
$self->{_idxhash} = {};

my $idx_ok = truncate $self->_idxhandle, 0;
my $dat_ok = truncate $self->_dathandle, 0;
return $idx_ok && $dat_ok;
}

>>135さん
ありがとうございます。clear メソッドはあったほうが良いですね。
マージさせていただいて良いですか？

関係ない話ですけど、
Apache::AntiSpam::HTMLEncodeを見てて、
メールアドレスの一部分だけでもHTML Entitiesに変換すれば、
ロボットのアドレス収集対策にかなり有効なんじゃないかと思いました。
たとえば、？anton@f2s.com とかみたいに。
もっとも、HTML Entitiesを解釈するロボットがあると元も子も無いけど。

あれ、＆#112;anton って書いたつもりだったのに・・
bbs.cgiの仕様変わったのかな？
てすと: & > <

> マージ
そのつもりで書いたので遠慮なくどーぞ。

> アドレス収集ロボ対策
JAPUさんが会社でやってますね。
ってあまり宣伝しすぎると効果が無くなるんでしょうけど。

s/&#[\d;]*/？/g って感じかな。

>>138
ありがとうございます。
ロボット対策> あら、ほんとですね。さすが。<- JAPUさん

このスレ終わっちゃったのカー　（ﾟдﾟlll)
テキストに飽きてきたから、使ってみるう

終わっちゃったんですか？

おれはいますよ。すんません。
仕事に殺されています。<-言い訳。

IxFileの配列版File::Arrayを構想中。

>>45
> * IO::File
> IO::Fileはかなり大きいので使わずに済ませてもいいのでは？

根拠は？たかだか3889バイトですが？
# と、Google検索でここにきたのでついでに書き込むテスト

しかもコメントを除くともっと少ないし :)

>>144
IO::Fileは
Carp、Symbol、SelectSaver、IO::Seekable、File::Spec
といろんなモジュールを呼んでますし、呼ばれたモジュールも
色々モジュールを呼んでるので全部あわせると結構な量です。

slashdot型掲示板作られた方は
いませんか？

slashdotってひたすら流れがつかみにくいと感じるのは俺だけ？

YaBBで似たようなことできるね。
ニュース系サイトなら更新するのに
わざわざ、エディタ＆FTP使わなくても
ブラウザだけで更新できるから便利だと思うんです。

あげ

>>147
slashdotならslashcode持ってくればいいのでは？

ふと思いついて>>143をFileIxって名前で作ってみました。
速度は（Perlということを踏まえた上で）まずまず高速です。
ビルトイン配列とほぼ同じインターフェイスで扱えるのが楽です。
アップしましょうか？

私がたまたまこのスレを見たのも何かの縁でしょうからよろしければアプしてください。
http://isweb36.infos...in/upload/upload.cgi

>■570氏
>　　▽サンプル掲示板
>　　　　http://maasa.antique...ch/sample/index.html

過去の遺物が晒されとる（ｗ

>>154 1.5ちゃんねるも遺物になったりして。。（笑

使ろう！

あぼーん

>>155

禁句です （ｗ

age

Perl超初心者なんですけど、
ログの処理を一気に配列化して読み込むと負荷が高いと聞いたので、
１件１件処理するようにしたいのですが、
それはどうやればできるのですか？

>>160

foreach関数

それじゃダメでしょ
while関数

kentさんはforeach関数で重いらしいんですけど、やっぱりwhileなんですかね？

>>163
while使えるところだったらみんな使った方がいいよ。

>>164
ごめんなさい。なぜですか？

foreachだとファイルの中身を全部配列に展開するからメモリを食う。

遭難ですか！！
ありがとうございました。

これ日本語かできないよ〜。

read(STDIN, $str, $ENV{"CONTENT_LENGTH"});

@parts = split('&',$str);
foreach(@parts) {
($variable, $value) = split("=");
$value =~ tr/+/ /;
$value =~ s/%([0-9a-fA-F][0-0a-fA-F])/pack("C",hex($1))/eg;
&jcode'convert(*value, 'euc');
$cgi{$variable} = $value;

>>168
ﾊｧ？
無理だと思うなら素直にCGI/CGI::Lite/CGI:Minimal/cgi-lib.pl使えよｳﾞｫｹ

CGI::Liteだって（ﾌﾟ

>>168
それは日本語化するルーチンじゃなくてハッシュ化するルーチンなわけだが。
それは置いといて間違ってるところは
5:split(/=/, $_);#splitの使い方間違ってます
7:$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
#[0-0a-fA-F]←0-0では1-9だった場合に変換されません。
9:$CGI{variable} = $value;
ハッシュは大文字にしたほうがわかりやすいです。強制はしませんが。以上。

ハッシュ化じゃなくよーするにデコードだろ。
単純ミスでギャーギャーわめくよりはモジュール使った方がよほどいいと思うがね。

ついでに、splitの第一引数は単なる文字列でも問題なく動くぞ。
まぁ/pattern/の形のほうが良いとは思うが。

>>172
たかがデコードするのにモジュールなんて使っちゃダメだよ。
どうしてもめんどいor出来ないときだけモジュールを使う。
これ処理を早くするための鉄則。

>>173
デコードルーチンが頭に入ってるなら、もちろんそれでも構わないが。
(まぁそこまで解ってるなら普通は自作モジュールだろうが)

だが「ミスを犯すくらいなら」処理を隠してくれるモジュールが得策だと思わないか？

掲示板で、KENT-WEB(http://www.kent-web.com/)の掲示板は書き込んだあとに
ブラウザの更新ボタンを押すと、エラーで帰ってくるのですが、
tacky(http://tackysroom.com/)の掲示板だと、書き込み後リロードボタンを押しても、
エラーにならず二重登録もされていません。どの辺が違うのでしょうか？教えてください。

Locationですか？

&errorでエラーサブルーチンの飛ばすんじゃなくて。
Locationにして掲示板に飛ばしてるんじゃないかな？

あっごめん
>>175に書いた。
あと
エラーサブルーチンの×
エラーサブルーチンに○
間違えた。
でPetitの場合は&html_logでそのまま掲示板に飛ばしてましたよ。
動作確認しました。

さらにスマソ
177=176です。

http://www.imjnews.c...az=thread&number=575
つーかﾏﾙﾁﾎﾟｽﾄうざい。

2/23からの間お前何やってた？少しは努力したか？少しは調べようとしたか？
ひょっとして他の掲示板にﾏﾙﾁﾎﾟｽﾄして回ってたのか？

全然変わってねーじゃねーか。

ふざけんなボケ。

>>176-178
ありがとうございました。

>>179
マルチポストは別に悪いことじゃないと思うよ(藁)。

＞マルチポストは別に悪いことじゃないと思うよ(藁)。

何が(藁)だよ。氏ねカス。

>>180
ﾊｧ?、氏ねよ

モノを教えてもらうのにこんな態度をでかくしていられるのか、人として不思議に思う。

よくわからんが怖くてやさしい人なのね。
マルチポストがいけないのではなく、
恩返しがないことがいけないことなのかも。
サポート受けたらあなたのリンクをクリック必須とかどう？(藁)。

それともいいあんあります？

perlで出来た掲示板の表示を早くする方法ってないですか？
ほとんどの掲示板はtableタグでレイアウトを整えてるじゃないですか。
でも、tableタグは<table>から</table>までが読み込まれたときに、画面に表示されるようなことを聞きました。

どうやったら、早くなりますか。

>186
テーブル使わなければいいって話でわ？

掲示板の検索機能ってありますよね？
あれをトップページから検索できるようにしたいのですが
どのようにすればいいのでしょうか？（スレ違いなら違うところで質問します

>186
テーブルを外してみるのがてっとりばやいね。
最近のデザイン主義のBBSじゃ難しいだろうけど。

>188
トップページからCGIを起動すればできるよ。
トップページのフォームから掲示板の検索機能へ直接値を渡してやるの。
CGI側がRefererを規制してるならそのURLだけは加えてやるのことも必要。

>>189
その詳しいやり方が今一わからなくて．．。
どこかに参考になるサイトってありますか？

使ってるのはKENTWEB?

HTMLタグとか分かる？
分かるんだったらBBSの過去ログ検索ページのソースを貼り付けるだけでいけるよ。

>>192
それやっても無理でした。エラーが出ました。

何使ってんねん。KENT-WEB？

KENTWEBじゃないけど、まぁ同じ様なもんです。
なんしか、トップページに掲示板と同じ（掲示板のログを検索できる）
検索窓をつけたいのですが、うまくできませんです。。

>195
だから教えてくれないと何行目をいじるとか教えられへん。

エラーってどんなエラー？
「refererリファラが違います」とか「いたづらはやめてください」とかだろ？

>>196
一度、KENT WEBでやってみたのでその時の話を。
（ちなみにシンプル掲示板です。）

ワード検索のソースを見て
トップページに貼り付けたのですが、検索結果は出なかったんです。
検索のボタンを教えてもトップページに変わるだけで。

教えても→押しても

だから何をつかってるのよ

>197
トップページに戻る？
<FORM>が間違ってんだろ。

cgiがeucで表示してるhtmlがS-JISなんておちじゃないだろうね？　まさか。

勉強になるCGIのソースありませんか？

>>202
俺はkentのaskaで勉強中

>>199-201

201さんのようなオチではないっす。
<FORM>も丸ごとｺﾋﾟﾍﾟしたんですが、無理でした。
なんか参考になる、又はこの件に関した技が載っている
サイトってないですかね？何か単純なミスをしてるっぽいです。。
（あと、使っている掲示板はKENTのシンプル掲示板で話を
　進めていただけたら。。それでもできないので）

action="../bbs.cgi"
相対パスがちがうとか
つーかお前なんかに誰も興味ないから
素直に使ってる掲示板かけや

第三者だがいくらなんでも

>つーかお前なんかに誰も興味ないから
>素直に使ってる掲示板かけや

は酷すぎると思うが．．。興味なかったら放置しろよ。
久々にマジで酷い煽りを見た。

>>204
それと、君もシンプル掲示板のソースをもっと見た方がよい。
たぶん、そんなに難しくない。

>>206
まぁまぁ。これが２ちゃん。
確かに同じ教えるにしても、煽るにしても、言い方ひとつ。

>>206
たまにもの凄い酷い煽りがあるからね。
単に氏ねとか馬鹿とか逝ってよしとかよりも
なんか”本心”で言われているような煽りって
はたから見てても気分が悪い。

>>206＝204 分かり易すぎ。
204が要領得ん書き方だから煽られるんだろ。
何使ってるのかって数回聞かれてるのに無視してるし。アホか。

>>209＝206 自作自演ウザイ

>>210
凄いですね〜それなら206-209まで全部自作自演ですね〜
２重カキコに引っ掛かるのにね（ｗ
２ちゃんでも保護レスする人いますよ。ていうか、悪い奴ばかりじゃないし。

つーか、206だけど保護レスというか
205の書き方があまりにも酷いと思わないか？

>>212
＞凄いですね〜それなら206-209まで全部自作自演ですね〜
ハァ？アホか

おっと、ID出しておくよ。ｼﾞｻｸｼﾞｴﾝになるからね（ｗ

ほら、煽られた（ｗ

>205の書き方があまりにも酷いと思わないか？
何使ってるっていう再三の情報提供要望を無視して
要領得ないアホな質問を繰り返すよりはマシ。

>>217
シンプル掲示板使っているって書いてあるよ。

あ、漏れもｼﾞｻｸｼﾞｴﾝになりますか？（ｗ

情報を出さない質問者程性質の悪いヤツは居ない。

197 名前：nobodyさん 投稿日：02/03/21 13:00 ID:Evst2w+i
>>196
一度、KENT WEBでやってみたのでその時の話を。
（ちなみにシンプル掲示板です。）

ワード検索のソースを見て
トップページに貼り付けたのですが、検索結果は出なかったんです。
検索のボタンを教えてもトップページに変わるだけで。


198 名前：nobodyさん 投稿日：02/03/21 13:01 ID:Evst2w+i
教えても→押しても


199 名前：nobodyさん 投稿日：02/03/21 13:26 ID:hXbohRxd
だから何をつかってるのよ

205=199だと思うが、すでに197でシンプル掲示板と書いてある。

>>219
教えて君ってのは元来そういう人間なんだよ。
http://www.nn.iij4u....nabe/osietekunn.html

今、このスレは自作自演のﾔｼが２人でバトルしてます（ｗ

シンプル掲示板って何よ

>>223
え！？KENTの掲示板の種類（しかも超有名）だけど．．．

元々レベルの高いスレだったのに糞スレ化したなぁ。panton氏とかは何処行ったんだ。

今思ったんだが、もしかして199はシンプル掲示板が
なんなのか分からない厨房で、だから
どういう掲示板かわからないから再三、種類を教えろと聞いていた。
しかし、200と201はちゃんと答えて返事書いてる。

これってどっちが厨房になるんだろ．．．

>>226
激しく微妙だな．．．そう思うと、205の煽りがおもしろくなる（ｗ

194 ：nobodyさん ：02/03/21 12:45 ID:???
何使ってんねん。KENT-WEB？


195 ：nobodyさん ：02/03/21 12:49 ID:Evst2w+i
KENTWEBじゃないけど、まぁ同じ様なもんです。
なんしか、トップページに掲示板と同じ（掲示板のログを検索できる）
検索窓をつけたいのですが、うまくできませんです。。

KENTWEBじゃないつってるじゃん

結局どっちなのよ。KENT-WEBのシンプル掲示板？
それとも違うのかよ。

アホばっか

>>228
その２レス後にシンプル掲示板って言ってるよ。
KENTWEBって書いてあるし。

197 名前：nobodyさん 投稿日：02/03/21 13:00 ID:Evst2w+i
>>196
一度、KENT WEBでやってみたのでその時の話を。
（ちなみにシンプル掲示板です。）

で、知りたいのは今使ってるヤツでのことじゃないの？

シンプル掲示板でもできないのに
他の掲示板（たぶん、難しいやつだろう）でもできるか？

全部ネタだろ

シンプル掲示板が有名、って言われてもナー
とりあえずスクリプトぐらいうｐしろよ。

>>216
KENTのスクリプトを知らないﾔｼは厨房ですか（ｗ
んなもん使わないし、仮に使ってても名前なんて覚えてねーよ。

思ったんだが、205って煽り方がちょっと変だけど
別に悪意はないんじゃないか？だって

>つーかお前なんかに誰も興味ないから
>素直に使ってる掲示板かけや

興味ないって言ってるのに、使っている掲示板を教えろって
言ってるし。と言うことは教えてあげるつもりだっただろうし．．

ていうか、205が正解をいっている(はず)
シンプル掲示板で試したらできたよ。

×>>216→○>>226

シンプル掲示板って ASKAのことかよ。。。

ASKA BBS
(シンプル掲示板)
- 2番人気 -

できねーんなら、トップページに IFRAME で
検索画面を表示させればいーんじゃねぇの

なんで俺が攻撃されてるんだ、、面倒だなぁ。

使ってる掲示板の種類を書かないって事は
「もし自分が２ちゃんに書き込みしてるのがバレたらヤダから詳しい事は書かない」
とか考えてるんだと理解し、
誰もお前自身のことなんかに興味はないから
使ってる掲示板の種類書けばもっと適切な助言してやるよさっさと掲示板の名前出せ

といった趣向のことを二、三行で書くと>>205のようになったのです、
と言えば理解して頂けますでしょうか。

>>226
askaとシンプル掲示板だったら、askaという呼び方の方がメジャーだろ。
それをしきりにシンプル掲示板って言ってた 188 が厨房に決まってら。
それも改造したいスクリプトは言わないしな。
つーか、ここは質問スレなのか？

客「ノートパソコンが動かないんだが」
店「了解しました。お使いのパソコンのメーカーと機種をお願いします」
客「それは言えないが、ソニーのVAIOだと思ってくれ」

age嵐

sage嵐

使ろう！ 嵐

>>249
ヲヲ、今気付いた！ﾜﾗﾀ！

>>250 ｶﾞｲｼｭﾂ

あげ嵐

あぼーん

http://www.pureweb.j...in/petitf/petitf.cgi
暇だから使ってみた（ﾊﾟｸﾘ）

Perlをあまり知らない奴でも
掲示板を１から作れるサイトってない？
KENTのAskaBBS程度のものを作るのが目標。

Perlも知らない、検索も知らないんじゃどうしようもないな

検索の仕方は知らないです。ｲﾊﾟｰｲでてくるので。

>>255

本買え
他人のコード参考にしろ

掲示板に最低必要な機能って何だと思いますか？

あぼーん

>>259
データをかきこむ。
de-taをよみこんで、ひょうじする。
最低限。

data という言葉を間違えない程度の知能。最低限。

もう誰も作らないの？

なんか、目新しいCGIを作りたいんだけど、これってのがない。
そこで疑問に思ったのだが、2chみたいなスレッド形式の掲示板が
ベストなんだろうか？ 猫も杓子も2chを真似てスレッド形式掲示板
を設置しているがもっと使いやすい、見やすい形式の掲示板がある
のではないだろうか？
P2Pの掲示板なんてのもあるみたいだが、やっぱ初心者はブラウザ
さえあれば見れるCGI掲示板に群がるだろう。

みんなどう？

>>264
あなたにとって使いやすい、見やすい掲示板の表示上のデザインを、htmlで書いてみてくれ

#スレッド形式掲示板は、すべて2chを真似ているわけではないと思う。

↓こんなスレがあったのね。
http://pc.2ch.net/te...gi/php/995359658/l50

>265
＞スレッド形式掲示板は、すべて2chを真似ているわけではないと思う。
真似てってのは、2chが流行ったからみんな避難所ていうか、
二番煎じみたいなサイトを作ってるって意味。

＞あなたにとって使いやすい、見やすい掲示板の表示上のデザインを、htmlで書いてみてくれ
具体的には自分でもよく分からないけど、今のところ思い付く不便さは
１、スレッド一覧が見にくい(かちゅつかえばいい？）
２、参照(>>??ってやつ）をたどるときしんどい。
くらいかな。

掲示板を使ろう！
みたいなサイトはないですかね？

>>267
どんな内容よ？
素人向け講座なら腐るほどあるだろ。

このスレみたいな感じの

>>269
どんな感じよ？
要点を説明するか自分で作れ。

>>269
じゃ、このスレでいいじゃん。

カスタマイズしてつくったのですが、どーしても
ログの検索がうまくいきません。

http://www.saiin.net/~ch/sample/
においています。

最新１００とか、１−５０とか、全部、、とやると、
処理してくれているようですが、なぜかデータがブラウザに出ず、
ダウンロードを指示されてしまいます。
実際にダウンロードし（つまりディスクに保存し）、
その後ブラウザで読み込めばきちんと表示されます。

どーしたらいいのでしょうか？
しろうとなりに工夫してきましたが、どーしてもここでいきづまっています。

gzipでもしてんの？
ちゃんとContent-type吐き出してる？

見たけどこんなのはいてるぞ。
Content-Type: application/x-httpd-cgi

>>274
それをはくってのはおかしなことなんですか？
何をはくようにすればいいのでしょうか？

しろうとですみません。

もうね、馬鹿かと、あふぉかと。
Content-Type: text/html
吐けと。

>>276
ありがとうございます。
そこらへんをさがしています。

>>277
探さなくても検索すれば・・・まぁいいか、

（夏がまだ残っている・・

<php?
for($i=0;$i<999;$i++)
{
print("竹之内豊");
}
?>

つまんね

（＾＾）

（＾＾）

今度、自分の学校のサイトを作ることになりました。
掲示板も作りたいと思いますが、次のようなことはperlで可能
なのかどうか、教えてください。

１年（６クラス）２年（６クラス）３年（７クラス）合計１９クラスあります。
それぞれにまったく同じタイプの掲示板を作成したいのです。

?とりあえず１つの掲示板を作成する。
?１９クラスそれぞれにＩＤを振ってＩＤが１のときは
　　１年１組に該当するログを表示する。ような分岐処理をする。

このようなことは可能でしょうか？

参考サイトなどあるとうれしいです。

アドバイスお願いします。

可能です、そんな基本的な質問してつくる気あるの？
スクリプト配布サイト調べてみ。

>>283
２ちゃんねるもそれと同じ事やってる。

どうせ作るなら19個掲示板作って、管理だけ一つのCGIで出来るようにした方がらくでない？

>>286
?でログファイル名渡した方が楽だす。
１９個も作ったらデザインちょっと変更
したい時なんてやってられない〜。

いや、各クラスがデザインを自由に変えられるというのが楽しいかなぁと思ったので。
apeskinみたく、デザインを外部ファイルから取るとか(爆)

デザインファイルもパラメータにすれば？

今perl勉強中なんですけどperlで作る掲示板について
詳しく説明してあるサイトないですか？

あぼーん

（＾＾）

　　 ∧＿∧
　　（　　＾＾ ）＜ ぬるぽ（＾＾）

━―━―━―━―━―━―━―━―━[JR山崎駅（＾＾）]━―━―━―━―━―━―━―━―━―

http://ideas.paunix....testbbs/mldforum.cgi

PERLでPHPbbsっぽいの作ってみている。

2chで板にアクセスが多くなり過ぎて板分割するのって、
スクリプトを増やすってこと？

あぼーん

>>297
サーバを増やす。

Frameをつけてみた。
http://ideas.paunix....m.cgi?cgi_mode=FRAME
2chとphpbbsの間の子みたいな感じに。
動作テスト中なので、適当な文字列を投稿して
試してみて下さい。

PERL人気ないの。

>>301
へー、そうなの。

なんで人気ないの？

>>295
すごいかっこいい
でも
おもいとおもった

>>304
朝鮮系はですねぇ、、機能よりも見かけなんだよ。

>>305
朝鮮系にしないでくれ。(;;
infoseekの機械翻訳を使って英語、中国語にも
対応しています。ただ、今のレベルの機械翻訳
精度では、使えるのは日韓くらいですが。

この板自体が寂しい...

あぼーん

CGI掲示板での、連続投稿負荷の処理能力は、サーバーのCPU性能にも
依るのでしょうか？　

自宅のPCでサーバー立てて、掲示板をmethod=getでも投稿できる
ようにして、imgタグにその投稿時URLを埋め込んだものを100くらい
書いたHTML docをローカルにブラウザで読み込ませて100連続投稿
させると、掲示板ログデータが崩れてしまいます。
30程度なら大丈夫なようですが。

それとも、スクリプトが煩雑すぎる（？）の問題でしょうか？

ファイルロックじゃないのか？

>>309
http://pc2.2ch.net/t...i/php/1024795138/l50

ファイルロックが問題なんですね。
さっそくログ書き込みの部分に
flock()を入れてみました。

flock()で解決しました。

http://seirei.ath.cx...l/thread/thread.html
どう？

>>314
よくがんばった。感動した。

>>309

そんなテストの仕方がわかるのに、flockを知らないって…
どういう風にperlを学んだんだYO。

こんなのどう？
ログファイルのバックアップ処理。

# 更新間隔
$span = 30 * 24 * 60 * 60;

# 最終変更時間取得
$log_mtime = (stat($log_file))[9];
$backup_mtime = (stat($backup_file))[9];

if ($log_mtime > $backup_mtime + $span) {
　open(BACKUP, "$backup_file") || &error("file open error");
　# 更新
　print BACKUP @logs;
　close(BACKUP);
}

書き込み処理らへんに組み込めばそこそこ使えるかな？
時間じゃなくて書き込み件数で更新したほうが良さそう。

Webで公開されてる掲示板スクリプトとか
Perl初心者入門で入った

それで簡単な掲示板は作れるようになったけど、
他には何か面白いscriptあるかな。

あぼーん

あぼーん

あぼーん

あぼーん

あぼーん

http://www.ace-cgi.j...i/bbs/107/index.html

データファイルにパスワードをそのまま書き込む掲示板

パスワードというのは掲示板の管理パスワードのこと。

やっと検索機能を追加。
http://ideas.paunix....m.cgi?cgi_mode=FRAME

　　 ∧＿∧
　　（　　＾＾ ）＜ ぬるぽ（＾＾）

質問なんですが、OTDとかteacupとかの有名どころはどんなCGIで動いてるのかな？
OTDはC言語らしいけど。

ぜんぜん盛り上がらないですねぇ。。.
http://ideas.paunix....m.cgi?cgi_mode=FRAME

ageまひょか。

掲示板のデータファイルって
何KBくらいまで動作に支障を
きたさずに保存できるの？

>>335
どの掲示板のシステムでどんなスペックのサーバの話ですか？

糞スレ

>>336
scriptは自作です。
サーバーはDEC Alpha DS10, NetBSD 1.6.1, Memory 3072MB。

2chはスレごとに固有のデータファイル使用してるの？
それで1000投稿くらいは保存できると。

大きいファイルを作ったくらいで動作が不安定になるOSは無いだろうから、
そういうファイルをどう扱うかがポイント。

丸ごと読み込むタイプの場合はどうでしょう。

ファイルシステムの限界まで

にべもない。

自鯖に画像を置かずに、リンク経由で画像が表示できる画像掲示板を作りたいのですが、
参考になる掲示板はご存知ありませんか？

入力フォームで画像のURLを添付すれば、掲示板にその画像が表示されるという感じの・・・。

>>344
どこにでもある、書き込み者がURI書くと
<A HREF=・・・ ができるのがあるでしょ？
あれを <IMG SRC=・・・　に変えるだけでできると思うんだが・・・

リンクだけならまあ許せるが、他のとこの画像を引っ張ってきて
表示させるようなBBSは迷惑だからやめろ！怒

>345
そうなんですか。

自分はオリジナルの掲示板が作りたく、これからPerlを勉強してみようと思っているド素人なもので・・・。
たいへんレベルの低い質問をしてしまったようですね。（笑）
すみませんでした。

確かに勝手に直リンっていう状況になるだろうから
マナー的にｲｸﾅｲ

直リンは著作権的には良いが、imgタグで勝手に人の絵をはっつけるのはNGじゃなかったか？

>>349
著作権法上の「複製」には当たらないと思うが、権利の侵害にはなりうるね。
もし著作権法に触れないとしても、民事で訴えられたらかなり不利だと思われる。

Google のイメージ検索とか、どうなるんだろ？

あんな大手検索エンジンにケンカ売るアホはいない。
検索で引っかかるってのは広告出してもらってるのと同じなんだから。

まあ、世の中にはどんなアホがいるか分からないから……（笑）。
でも、Google でも一応、イメージをクリックしたら「この画像には著作権が」云々
が出るから、一応、気をつかってるんだよね。

掲示板でも縮小表示してクリックすると引用元に飛ぶってのなら、どうだろ？
やっぱ、マナー違反かな？

画像の「引用」はある程度認められるだろうけど、
直リンクはどうなんだろうね。

引用ってどういうこと？
自分のサーバー・ディレクトリにコピーを置いちゃうってことかな？
考えようによっちゃ、直リンクより問題がありそうな気も……。

>>351
コピー(複製)はしてないし、リンク元の情報を明記してるからセーフ。

>>353
それに加えてリンク元のURLと、権利者が別に存在することを
明記すれば法的にはセーフかな。マナーは知らんが

>>354
著作権法上の「引用」って著作物の部分的なコピーを指すんだが・・・。

知的財産権について無知なのが多いみたいだけど
直リンごときで訴訟持ち出すやつぁいねーよ
親告罪って言葉を調べてみろ
問題なのはマナーだってのになんで法律の話もちだしたがるかな

>>357
一番無知なのはお前だな。今まで何件も訴訟起きてるが。
画像じゃないが直リンによる訴訟で一番有名なのが
トータルニュース社事件。

不実表示、不正競争、商標権・著作権侵害で提訴したが、その後
トータルニュース社が直リンを解除する形で和解。

>>358
直リンって言葉は共通してるけどさ…
もう少し上の話から読めないの？
確かに>>357には画像って書いてないけど。
そもそも企業と個人の目的も…いや、いいや

>>359
画像の直リンでも訴訟起きてるって。大きな事件にならなかったせいもあって
ソースが出せないから書かなかったけどさ。
画像の方が一般的にクレジット入ってない分ソースが確定しにくいから不実表示や
不正競争では争いやすい。

個人かどうかも関係ないね。上のトータルニュース社も会社形態は取ってるけど、
スタッフ5人、資本金なんてあってないようなママゴト企業だったわけだし。

とにかく、

>直リンごときで訴訟持ち出すやつぁいねーよ

この一文がデタラメであることと、>>357が知的財産権について恐ろしく
無知である事実に変わりはない。

>>360
はいはい、わかったよ、訴訟オタだってことは。
程度とケースによる法解釈はできないわけ？
２ちゃんに直リン貼ったやつを告訴するか？
winnyだのMXだので違法コピーしてるやつを全員告訴するのが現実的？
このスレで語ってる使い方で訴訟にあげられるのが現実的だと思うのか？
しても警告どまりだろ。だからマナーの問題だって書いてんだよ。
俺は恐ろしく無知かもしれないが、お前は恐ろしくなんでもかんでも一括りで解釈しすぎだよ。

ああ、っていうか無知って書いたのが
気にくわなかったのか。
それなら撤回する。
知識だけある人間がいるんだな。
　
これ以上はスレ違いの話題だし叩かれそうだから消えるよ。
>>360もひとしきり主張して飽きたら長居しないほうがいいぞ。

>>357
ウザイし適当なこと言うな
人の無知を指摘する前に充分に予習しろ
　
>>360
ウザイし「写真とるだけで訴えるやつはいない」って言っても
「田代まさしは云々」言って無知だとか言うのか
　
結論として両名ともにウザイので逝って良し

>>361
> 直リンごときで訴訟持ち出すやつぁいねーよ

上記の文が間違ってると指摘しただけなんだがな。
訴訟持ち出すヤツなんて沢山いる。

> ２ちゃんに直リン貼ったやつを告訴するか？

今回「直リン」と呼んでるのは、IMGタグ等で直接コンテンツを
貼る行為だったはずだが。知ってて拡大語句解釈して楽しいか？

もし２ｃｈでIMGタグが貼れて、著作権のある画像を貼りまくるやつが
現れたらそいつは告訴される可能性は高いね。

> winnyだのMXだので違法コピーしてるやつを全員告訴するのが現実的？

「違法コピーごときで訴訟持ち出すやつぁいねーよ」といわれたら「ウソつけ」と答えるが。
なんでそういちいち拡大解釈するかね。

> ウザイし「写真とるだけで訴えるやつはいない」って言っても

盗撮したら訴えられて当然だと思うが。比喩表現が下手だな。

まあ、掲示板の場合は、
>>353 >>356 に加え、
・画像を貼る場合は元サイトが転載等を禁止していないか、充分ご配慮下さい。
・貼られた画像に問題がある場合は、お知らせ下さい。ただちに削除します。
の注意書きを加えるということで、ファイナル・アンサー？

>>364
もういいって。その話は。
これ以上煽り合いしたいんなら>>357と一緒によそ行ってくれ。
どっち側の書きこみも重箱の隅突っつきながら
自分の都合のいい解釈しかしてないんだから見苦しい。

すれ違い

質問。当方if文for文が書けて簡単なアンケートが作れる程度のものです。
掲示板のCGIを、画像を貼れるように改造したいのですが参考になるソースをご教授願いたく。
アップローダーでなく、URL貼り付けでその画像が表示されるようなものです。
具体的に
[img]http://xx.com/image.jpg[/img]
と書いた場合に、<img src="http://xx.com/image.jpg">というタグが挿入されるような。
アドバイスおねがいいたします。。

質問の場所間違ってます？

おまいはバカか。そんな迷惑なもの作ろうとするな！

>>370
じゃ質問変えて
[url]http://yahoo.co.jp[/url]
と書くと
<a href="http://yahoo.co.jp">リンク</a>
というタグが挿入されるような。

同じですけど

urlをimgに変えようってつもりだろ？教えないよ。

>>372
いえ、改心してURLのほうにしました。
ぜひ教えてください

urlをimgに変えようってつもりだろ？教えないよ。　

つか、この程度いろいろ実験するだけでできると思うのだが

>>375
[url]~~[/url]の間までを、変数に入れることができればなんとか・・・。
×〜×間を、という指定がわからず。。。

スレ違い。ここは論争をするスレなんだよ。

変数なんて言ってる時点でダメダメ。方法はいくらでも載ってる。検索しれ。

リンク問題は製作板に専用スレあるからそっちでやっとくれ。

>371
置換とか正規表現とかその辺りの言葉で検索してきてくれ。
まずはそれからだ。

二次元配列で掲示板の内容の並べ替えをしたいんですが
ソートがうまくいきません

指定した列で並べ替えるソートかけるにはどうしたらよいのでしょうか？

PERLスレの方で配列に関しては回答いただきました
掲示板に適用してみまっす

ここのIDのようなものはどのように生成しているのでしょうか。
ただ単にIPをcryptやらrandして生成しているのでしょうか？

http://s37.1000gex.net/1000gex_4_1.zip

これのbbs.php内に2chと同じトリップ生成ルーチンが入ってる