#!/usr/local/bin/perl ←-------この行はプロバイダーによって変えなアカンみたいやで。電話で聞いてみてな。
ちなみに うちは「#!/usr/bin/perl5」に変更したで。
;# 簡易CHAT version 4.0(フリーソフト)
;#
;# Script written by Kazu.Y
;# Created on: 26/FEB/96
;# Last Modified on: 24/SEP/97
;# I can be reached at: rescue@ask.or.jp
;# Scripts Found at: http://www2r.biglobe.ne.jp/~rescue/
# 注意!これ以前のバージョンとのデータ互換はありません.
#----------------#
# 初期設定 #
#----------------#
#◆minichat.datのパス設定
# minichat.cgiと同じ場所に設置する場合はこのままでよい.
$chat_file = './minichat.dat';
#◆名称
$title = '簡易チャット(MiniCHAT)'; ←---------ここはタイトル名やで。ぼくは「チャットくん」に変えた。
#◆<BODY>設定
$body = '<body bgcolor="#aabbcc">';
#◆チャット表示行
$max = '10'; ←-------------------ここはチャットの一画面
での表示行数。ぼくは「30」にした。
#◆画面に挿入するリンクURL
$modoru = 'http://www.xxx.or.jp/~user/'; ←---チャットを終わるとき、どこに戻るかのアドレスを指定。
ぼくはの場合は「http://home.m07.itscom.net/pungum/」メイン画面
やね
#◆画面に挿入するリンクの名称
$modoru_name = 'ホームページへ'; ←---------------チャットを終わるときのボタンの名前。
このままでええんとちゃう?
#◆入力方式 (標準:post その他:get)
$method = 'post';
#◆日本語コード変換ライブラリ
# minichat.cgiと同じ場所に設置する場合はこのままでよい.
require './jcode.pl';
#----------------------------------------------------------------------------
〜〜〜〜〜〜以下略〜〜〜〜〜〜
|