#!/usr/bin/perl package OddMuse; use strict; umask(006); use vars qw($DataDir $ConfigFile $UseConfig $ConfigPage $AdminPass $EditPass $RunCGI $PageDir $KeepDir $RefererDir $TempDir $LockDir $NoEditFile $RcFile $RcOldFile $IndexFile $VisitorFile $PermanentAnchorsFile $ModuleDir $NearDir $ScriptName $FullUrl ); $DataDir='/var/www/site/var/oddmuse/main'; $ConfigFile = $DataDir . "/config.conf"; $UseConfig = 1; $ConfigPage = ''; $AdminPass = ''; $EditPass = ''; $RunCGI = 0; do '../oddmuse_base/russian-utf8.pl' unless $INC{'../oddmuse_base/russian-utf8.pl'}; do '../oddmuse_base/current' unless $INC{'../oddmuse_base/current'}; $PageDir = "$DataDir/page"; # Stores page data $KeepDir = "$DataDir/keep"; # Stores kept (old) page data $RefererDir = "$DataDir/referer"; # Stores referer data $TempDir = "$DataDir/temp"; # Temporary files and locks $LockDir = "$TempDir/lock"; # DB is locked if this exists $NoEditFile = "$DataDir/noedit"; # Indicates that the site is read-only $RcFile = "$DataDir/rc.log"; # New RecentChanges logfile $RcOldFile = "$DataDir/oldrc.log"; # Old RecentChanges logfile $IndexFile = "$DataDir/pageidx"; # List of all pages $VisitorFile = "$DataDir/visitors.log"; # List of recent visitors $PermanentAnchorsFile = "$DataDir/permanentanchors"; # Store permanent anchors $ModuleDir = "../oddmuse_base/modules"; # Directory for extension files (ending in .pm or .pl) $NearDir = "$DataDir/near"; # For page indexes and .png files of other sites undef $ScriptName; undef $FullUrl; DoWikiRequest(); 1;
Дата создания: 2006-05-24 16:56:06 (Фетисов Н. А. (naf))
Последнее изменение: 2006-05-24 16:56:06 (Фетисов Н. А. (naf))
Владелец: Фетисов Н. А. (naf)
Версия: 1
Wiki::Admin Карта раздела Оглавление Изменения за сутки Изменения за неделю Изменения за месяц