# msg11def.pl # Message Board V11 グローバル変数定義 #イメージファイルディレクトリ #リンクアイコン/カウンタイメージファイルを #CGIとは別のディレクトリに設置する場合はイメージファイルを置くディレクトリ #(URL)を指定して下さい #ディレクトリを指定するので 指定の際は最後にスラッシュ(/)を忘れないで下さい $IMGDIR = ''; #指定の例 #$IMGDIR = 'http://www.my.or.jp/~mydir/images/'; ########## #利用できるタグ指定 @Taglst = ('','','','','','','','',''); ########## #メインCGI名 $MAINCGI = 'msgbrd.cgi'; #管理者作業用CGI名 $WORKCGI = 'msgwork.cgi'; #削除用CGI名 $DELCGI = 'msgdel.cgi'; #管理者用パスワード保持ファイル名 $MPWDFILE = 'msg11.cgi'; #ログファイル名 $LOGFILE = './data/msg11.log'; #アクセスカウンタファイル名 $COUNTER = './data/msg11.cnt'; #設定記録ファイル名 $CFGFILE = './data/msg11.cfg'; #送信メソッド $METHOD = 'POST'; #漢字コード $CHARCODE = 'sjis'; #リンクアイコンイメージ $HPICON = 'home.gif'; $MAILICON = 'mail.gif'; #リンクアイコンイメージサイズ(幅/高さ) $ICONW = 18; $ICONH = 16; #アクセスカウンタイメージサイズ(幅/高さ) $CIMGW = 15; $CIMGH = 20; ########## $REMOTE = $ENV{'REMOTE_HOST'}; if($REMOTE eq ''){ $REMOTE = $ENV{'REMOTE_ADDR'}; } $AGENT = $ENV{'HTTP_USER_AGENT'}; #$ID = $ENV{'REMOTE_USER'}; $ID = 1; $REMOTE =~ s/,/./g; $REMOTE =~ s/'/./g; $AGENT =~ s/,/./g; $AGENT =~ s/'/./g; $coName = 'msgbrd11-user'; $times = time; ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($times); $mon++; $year += 1900; $POS1 = $times; $POS2 = $min+$sec+1; $hour = sprintf("%.2d",$hour); $min = sprintf("%.2d",$min); $sec = sprintf("%.2d",$sec); $fs; $fe; $fco1; $fco2; $fco3; $fco4; $lco1; $lco2; 1;