################################## ###CONFIGURATION################## ################################## ################################## ###FULL URL of BBS################ ################################## $BBS_HOME='::'; ################################## ###DISPLAY DIRECTORY############## ################################## $HTML_DIR='::html'; $ERROR='error.html'; $ERROR_CHAR='error-char.html'; $SUCCESS='success.html'; ################################### ###STORAGE DIRECTORY############### ################################### # This directory should be "server" readable/writeable/executable only. $STORAGE_DIR='::message'; # The files below should be world readable/writable only. $ERROR_COLLECT='error-collect.txt'; $SUCCESS_COLLECT='bbs-data.html'; $TOKEN_FILE ='counter'; $THREAD_TOKEN ='thread_counter'; # if your system does not support the flock() function, comment this out, or set it to 0. # the latest edition of NT Perl, as well as all unix perl should have flock build in. $flock_exists = 1; ################################## ### END OF CONFIGURATION ######### ################################## ### APPEND DIRECTORY with FILE ### ################################## $ERROR = $HTML_DIR.':'.$ERROR; $ERROR_CHAR = $HTML_DIR.':'.$ERROR_CHAR; $SUCCESS = $HTML_DIR.':'.$SUCCESS; $TMP = $STORAGE_DIR.':'.($$).".tmp"; $ERROR_COLLECT = $STORAGE_DIR.':'.$ERROR_COLLECT; $INDEX_FILE = $STORAGE_DIR.':'.$SUCCESS_COLLECT; $TOKEN_FILE = $STORAGE_DIR.':'.$TOKEN_FILE; $THREAD_TOKEN = $STORAGE_DIR.':'.$THREAD_TOKEN; ###################################