#!/usr/bin/perl

# Setup Start --------------------------------------------------------------#

# データフォルダのパス
my $dataDir = './data/';

# データファイルのパス
my $countDataFile = './data/count.dat';

# 今日のカウント数用のログファイルのパス
my $todayCountLog = './data/today.log';

# 昨日のカウント数用のログファイルのパス
my $yesterdayCountLog = './data/yesterday.log';

# テンプレートファイル保存先のパス
my $templeteDir = './html/';

# スタイルシートファイルのパス
my $cssFile = './html/css/common.css';

# 今日・昨日のカウント数を保存する( Yes=1, No=0 )
my $tyFlag = '1';

# カウント数が下記桁数になるまで先頭に 0 を付加する
# 0 を挿入したくない場合は 0 としてください
# 桁区切り処理を行うとこの設定は無視されます
my $totalWidth = '6'; # 累計のカウント数
my $tyWidth    = '4'; # 今日・昨日のカウント数

# 桁区切り処理を行う( Yes=1, No=0 )
my $totalSeparate = '0'; # 累計のカウント数
my $tySeparate    = '0'; # 今日・昨日のカウント数

# 同一 IP アドレスによる重複カウントを防止する( Yes=1, No=0 )
my $checkIP = '0';

# ロック処理を行う( Yes=1, No=0 )
my $lockFlag = '1';

# 管理モードのパスワード
# 管理モードを使わない場合は 0000 とする
my $adminPwd = '1234';

# Setup End ----------------------------------------------------------------#



          

[www]┐
     ├ ･･･(略)･･･.html ( このファイルに呼び出すためのタグを書く )
     ｜
     └ [cgi-bin] ┐
                  ├ textCounter.cgi             <755> メインプログラム
                  ├ gifcat.pl                   <644> 画像連結用モジュール
                  ｜
                  ├ [data]┐                    <777> データ格納ディレクトリ
                  ｜       ├ count.dat          <666> カウントデータ保存ファイル
                  ｜       ├ today.log          <666> 今日のカウント数保存ファイル
                  ｜       └ yesterday.log      <666> 昨日のカウント数保存ファイル
                  ｜
                  └ [html]┐                    <644> テンプレート格納ディレクトリ
                           ├ *.html             <644> 各種テンプレートファイル
                           ｜
                           └ [css]┐            <644> CSS格納ディレクトリ
                                   └ common.css <644> CSSファイル