Annotation of processmail/parameters.pl, revision 3.2

2.1       boris       1: # В этом файле собраны ЛОКАЛЬНЫЕ параметры -- "настройки"
                      2: #
3.2     ! boris       3: #$Id: parameters.pl,v 3.1 2008-03-24 16:01:47 boris Exp $
2.1       boris       4: #
2.3       boris       5: #
                      6: # Количество зачётов
                      7: $ROUNDS=2;
                      8: 
                      9: ###############################################################
                     10: # Следующие настройки индивидуальны для каждого раунда, начиная
                     11: # с первого
                     12: ###############################################################
                     13: 
                     14: # Первый раунд
                     15: 
                     16: # Название раунда
                     17: 
                     18: $NAME[1]="Спринт";
                     19: 
                     20: # Вопросы раунда
3.2     ! boris      21: # Обычно начинаются с 1, но можно и с 0. Отрицательные номера не разрешаются.
2.3       boris      22: 
                     23: $MINQUEST[1]=1;
                     24: $MAXQUEST[1]=12;
                     25: 
3.0       boris      26: # Файлы раунда.  Следующий перекрывает предыдущий.
                     27: # Список заключён в квадратные скобки, отдельные файлы разделены ЗАПЯТЫМИ.
                     28: #      $FILES[1] = [ "sprint.mail", "sprint-extra.mail" ];
                     29: #
                     30: # ВНИМАНИЕ: формат этого параметра изменился с предыдущей версии!
                     31: 
                     32: $FILES[1]= [ 'sprint.mail' ];
2.3       boris      33: 
3.0       boris      34: # Внезачётные вопросы раунда. В квадратных скобках, номера разделены ЗАПЯТЫМИ.
                     35: # Во втором раунде эти вопросы тоже будут вне зачёта (но можно будет и
                     36: # учесть, см. ниже описание $NOCOUNT[2]).
                     37: #      $NOCOUNT[1] = [];
                     38: #      $NOCOUNT[1] = [ 2, 3, 4 ];
                     39: 
                     40: $NOCOUNT[1]= [];
2.3       boris      41: 
                     42: 
                     43: # Второй раунд
                     44: 
                     45: # Название раунда
                     46: 
                     47: $NAME[2]="Стайер";
                     48: 
                     49: # Вопросы раунда
                     50: 
                     51: $MINQUEST[2]=1;
                     52: $MAXQUEST[2]=18;
                     53: 
3.0       boris      54: # Список заключён в квадратные скобки, отдельные файлы разделены ЗАПЯТЫМИ.
                     55: #      $FILES[2] = [ 'predvarit.mail', 'osnovn.mail' ];
                     56: #
                     57: # ВНИМАНИЕ: формат этого параметра изменился с предыдущей версии!
                     58: 
                     59: $FILES[2]= [ 'stayer.mail' ];
                     60: 
                     61: # Внезачётные вопросы в этом раунде.  В квадратных скобках, через ЗАПЯТУЮ.
                     62: # Этот список ДОБАВЛЯЕТСЯ к уже перечисленным в $NOCOUNT[1].  Однако
                     63: # если вы хотите исключить какой-то из ранее указанных вопросов (например,
                     64: # в гипотетической ситуации "вопрос номер 5 был исправлен слишком поздно,
                     65: # поэтому в Спринте не учитывается, а для Стайера используется"), то
                     66: # укажите его номер со знаком минус: "3 -5 6"
                     67: #      $NOCOUNT[2] = [];
                     68: #      $NOCOUNT[2] = [ 3, -5, 6 ];
                     69: 
                     70: $NOCOUNT[2]= [];
2.3       boris      71: 
                     72: 
                     73: #########################################################
                     74: #   Теперь общие настройки
                     75: #########################################################
                     76: 
                     77: 
2.1       boris      78: #
                     79: # Адрес листа z-info
                     80: #
2.2       boris      81: $address = 'z-info@chgk.info';
                     82: #$address="boris";
2.1       boris      83: #
                     84: # Обратный адрес дежурной команды и ее название
                     85: #
3.0       boris      86: $fromaddress = 'Boris Veytsman <borisv@lk.net>';
2.2       boris      87: $DK = '"Дракоша"';
2.1       boris      88: #
                     89: # $date -- системная процедура, которая вычисляет МОСКОВСКОЕ
                     90: # время. В Линуксе zdump это делает хорошо. В других операционных 
3.0       boris      91: # системах надо как-то исхитряться...  На самый худой конец, используйте
                     92: #      $date='';
2.1       boris      93: #
2.2       boris      94: $date = "export TZ='Europe/Moscow'; date";
2.1       boris      95: 
                     96: #
                     97: # Процедуры, которые печатают заголовок и конец мейла-напоминания
                     98: #
                     99: sub printheader
                    100: {
                    101: print  <<"END";
                    102: To: $address
                    103: From: $fromaddress
                    104: Subject: Svodka
                    105: MIME-Version: 1.0
                    106: Content-type: text/plain; charset=koi8-r
                    107: Content-Transfer-Encoding: 8bit\n
                    108: 
                    109: Уважаемые знатоки!
                    110: 
                    111: С вами говорит робот команды $DK
                    112: 
                    113: END
2.3       boris     114: print "На момент ", `$date`, "в зачёте '$NAME[$round]' сданы ответы от команд:\n\n"; 
2.1       boris     115: }
                    116: 
                    117: 
                    118: sub printfooter
                    119: {
                    120:     print  <<END;
                    121: 
                    122: --
                    123: Good luck
                    124: 
                    125: -Robot
                    126: END
2.2       boris     127: 
2.1       boris     128: }

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>