CGI-BBS > CGI > Perl > カスタマイズしたら・・・


カレッヂ
カレッヂ


質問者 堺ちゃん  投稿日 1/21(日) 10:41:35
どっちにしまショー?(ver. 1.3)ってのを設置しました。
作者のページがダウンロードだけになっていて(多分もうやってない)、掲示板などが見当たらないのでここで分かればなと思い書いています。

最初はうまく設置できたのですが、名前を登録できるようにしようと思いまして、
改造してみたらエラーが出てしまいました。
素人が下手に改造するもんじゃないですね。。。(ーー;ゞ

スクリプト本体は
http://www.tk3.speed.co.jp/jump-over/cgi-bin/dotch/dotch.cgi
で、「Internal Server Error」になると思います。
スクリプトの内容は
http://www.tk3.speed.co.jp/jump-over/dotch.txt
で見れます。
オリジナルのスクリプトは
http://www.mediawars.ne.jp/~okapin/CGI/dotch/download/
に置いてあります。

どのへんが間違ってますかねぇ?
自分なりに探したのですが、やっぱり分かりません。
よろしくお願いします。m(_ _)m
回答者 maeda  [削除]  投稿日 2/5(月) 11:49:15
# 349行目あたり

foreach $data (@datas){
($no,$ques,qname,$typea,$ansa,$typeb,$ansb,$r_host) = split(/ \' /,$data);


# 修正
foreach $data (@datas){
($no,$ques,$qname,$typea,$ansa,$typeb,$ansb,$r_host) = split(/ \' /,$data);


"qname"に"$"マークが付いてないだけですね。
質問者 堺ちゃん  [削除]  投稿日 2/5(月) 12:42:26
できました!感激です!ありがとうございます!
スクリプト見返さなきゃいけなかったから大変だったでしょう?
お手数おかけしました。
返事はほとんどあきらめてたんですけど、よかったです!
回答者 maeda  [削除]  投稿日 2/5(月) 13:29:44
perlを入れてみたらどうでしょうか?
今お使いのパソコンにperlをインストールするとエラーの発見とかはやくできますよ。
一つ一つ見なおす必要はありません。

MS-DOSで
perl -cw ファイルのある場所
と打てば自動的にエラーを発見してくれます。

http://www.activestate.com/ActivePerl/download/APi522e.exe
でダウンロードできますよ。

では頑張ってください。
質問者 堺ちゃん  [削除]  投稿日 2/5(月) 17:26:12
いやぁ。。。それが。
私のPC、Macなんです。。。
MacPerlってのもあるんですけど、使い方が分からなくって。。。
回答者  [削除]  投稿日 2/5(月) 18:18:16
関係ないですけど
このスクリプト短い割には面白そうですね。


赤と黄色だったら……。
質問者 堺ちゃん  [削除]  投稿日 2/5(月) 21:10:37
でしょ?<面白い

赤と黄色??
回答者  [削除]  投稿日 2/5(月) 22:32:56
>赤と黄色??

部分的に白髪を残している人と
自分のモノマネする劇団やってる人が
「今夜のご注文は(以下略)」
ってやってるやつです。
質問者 堺ちゃん  [削除]  投稿日 2/5(月) 23:04:27
ああ、はいはいはいはい。
どっちの。。。ですね。

ところで、他にもあちこちミスありました。
細かいミス。
(色が反映されない、回答削除モードでaとbが違う、など)

返信(回答)する


Web裏技