Return to parameters.pl CVS log

Up to [Local Repository] / processmail

Started to move to the new scheme

# В этом файле собраны ЛОКАЛЬНЫЕ параметры -- "настройки"
#
#$Id: parameters.pl,v 2.3 2005/02/15 19:27:51 boris Exp $
#
#
# Количество зачётов
$ROUNDS=2;

###############################################################
# Следующие настройки индивидуальны для каждого раунда, начиная
# с первого
###############################################################

# Первый раунд

# Название раунда

$NAME[1]="Спринт";

# Вопросы раунда

$MINQUEST[1]=1;
$MAXQUEST[1]=12;

# Файлы раунда.  Следующий перекрывает предыдущий:

$FILES[1]='sprint.mail';


# Второй раунд

# Название раунда

$NAME[2]="Стайер";

# Вопросы раунда

$MINQUEST[2]=1;
$MAXQUEST[2]=18;

# Файлы раунда.  Следующий перекрывает предыдущий.  Файлы разделены
# ПРОБЕЛАМИ

$FILES[2]='stayer.mail';

#########################################################
#   Теперь общие настройки
#########################################################

#Использовать ли формат ИЧБ для вывода
$ICHB=0;

#
# Адрес листа z-info
#
$address = 'z-info@chgk.info';
#$address="boris";
#
# Обратный адрес дежурной команды и ее название
#
$fromaddress = 'borisv@lk.net';
$DK = '"Дракоша"';
#
# $date -- системная процедура, которая вычисляет МОСКОВСКОЕ
# время. В Линуксе zdump это делает хорошо. В других операционных 
# системах надо как-то исхитряться...
#
$date = "export TZ='Europe/Moscow'; date";

#
# Процедуры, которые печатают заголовок и конец мейла-напоминания
#
sub printheader
{
print  <<"END";
To: $address
From: $fromaddress
Subject: Svodka
MIME-Version: 1.0
Content-type: text/plain; charset=koi8-r
Content-Transfer-Encoding: 8bit\n

Уважаемые знатоки!

С вами говорит робот команды $DK

END
print "На момент ", `$date`, "в зачёте '$NAME[$round]' сданы ответы от команд:\n\n"; 
}


sub printfooter
{
    print  <<END;

--
Good luck

-Robot
END

#    print `fortune /usr/local/share/games/fortunes/`;

}