OKWAVEのAI「あい」が美容・健康の悩みに最適な回答をご提案!
-PR-
解決
済み

CGIのエラー修正したいのですが(;;)

  • 困ってます
  • 質問No.121917
  • 閲覧数40
  • ありがとう数1
  • 気になる数0
  • 回答数1
  • コメント数0

お礼率 100% (1/1)

初めて質問致します。どうぞ宜しくお願い申し上げます
m(__)m
cgiを設置し始めてようやく、CGIのHTML部分に文字等を入れたり等出来るようになったばかりの初心者です。

私書箱のCGIなのですが、私書箱内のメッセージや投稿者の色、私書箱の中を見た際の色や背景画像などが自由に変更できるというものです。


その変更機能部分の変更画面には移動できるのですが、内容を修正し、「変更」のサブミットボタンを押すと
Internal Server Error
と表示されてしまいます。


***********
# ユーザー設定変更フォーム
sub change_user{
if(!$f_user || !$f_pass){
$msg = '記入されていない部分があります';
&err;
}

open(DAT,"./$userdir/$user_file") || die "ファイルオープンエラー";
@line = <DAT>;
close(DAT);

$value = "$setuser\t$setname\t$settitle\t$setcomment\t$setpass\t$logfile\t$setcolor\t$setbackcolor\t$setback\t$settext\t$sett_user\t$sett_title\t$host\n";

foreach $line (@line){
($U,$N,$T,$C,$P,$LF,$SC,$SBC,$SB,$ST,$STU,$STT,$H) = split(/\t/,$line);
if($f_user eq $U && $f_pass eq $P){

print "Content-type: text/html\n\n";
print <<"HTML";
<html>
~中略~

現在のパスワード:<br>
<input type=password name=setpass maxlength=10 size=10 value=$P><br><br>

<input type=hidden name=CHANGE value=1>
<input type=hidden name=checkpass value=$P>
<input type=hidden name=setuser value=$U>
<center><input type=submit value=変 更>
</form>
</body></html>
HTML
exit;
}
} #foreach
通報する
  • 回答数1
  • 気になる
    質問をブックマークします。
    マイページでまとめて確認できます。

質問者が選んだベストアンサー

  • 回答No.1
レベル11

ベストアンサー率 31% (76/239)

なんとなく、問題はここに記入されていない部分な気がしますが……
ほとんどperlの知識はないのであまり気にしないでください。

なので、チェック用のCGIを使ってみてはいかがでしょうか?
補足コメント
mikenyanco

お礼率 100% (1/1)

補足の部分に書き込みで恐縮ですが
チェックのCGIを使用し、修正することが出来ました。
本当に有難うございました^^
投稿日時 - 2001-08-22 00:34:26
お礼コメント
mikenyanco

お礼率 100% (1/1)

早速使用してみます。
お教え下さり有難うございました^^
投稿日時 - 2001-08-21 22:52:17
-PR-
-PR-
このQ&Aのテーマ
このQ&Aで解決しましたか?
関連するQ&A
-PR-
-PR-
こんな書き方もあるよ!この情報は知ってる?あなたの知識を教えて!
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
-PR-
-PR-
-PR-

特集


いま みんなが気になるQ&A

関連するQ&A

-PR-

ピックアップ

-PR-
ページ先頭へ