Annotation of db/prgsrc/chgk.cnf, revision 1.5

1.2       boris       1: #!/usr/bin/perl
1.4       roma7       2: 
1.2       boris       3: $dir='result/';
                      4: 
                      5: $debug=0;
                      6: 
1.4       roma7       7: $dictdir       =  "../dict/";
                      8: 
                      9: $authorsfile   =  "${dictdir}authors";
                     10: 
                     11: $nicksfile     =  "${dictdir}nicks";
                     12: 
                     13: $ssnicksfile   =  "${dictdir}ssnicks";
                     14: 
1.2       boris      15: $maxqsize      = 3;  #максимальный размер учитываемых закавыченных фраз
                     16: 
                     17: $maxwsize      = 30;  #максимальный размер учитываемых слов
                     18: 
                     19: 
1.5     ! boris      20: $DUMPDIR = $ENV{DUMPDIR} || "../dump";
1.2       boris      21: 
1.5     ! boris      22: $stderr        = "$DUMPDIR/errors";
1.2       boris      23: 
1.5     ! boris      24: $unknown       = "$DUMPDIR/unknown";
1.2       boris      25: 
1.5     ! boris      26: $dumprs        = "$DUMPDIR/dumprs";
        !            27: 
        !            28: $warnings      = "$DUMPDIR/warnings";
        !            29: 
        !            30: $in2out        = "$DUMPDIR/in2out";
1.2       boris      31: 
                     32: $minstop=200000;
                     33: 
                     34: $qnumber       = 500000; # обрабатываются вопросы, ID которых меньше чем $qnumber.
                     35:                          # Чтобы обработать все вопросы, просто укажите 
                     36:                          # достаточно большое значение
                     37: 
1.4       roma7      38: $newdict       = "${dictdir}ndict.koi";
1.2       boris      39: 
                     40: $kwords        = "${dir}kwords";
                     41: 
                     42: $v2k            = "${dir}v2k"; # номер вопроса -> список кл. слов
                     43: 
                     44: $k2v            = "${dir}k2v"; # номер ключевых слов -> список  вопросов
                     45: 
                     46: $cv2k            = "${dir}cv2k"; # номер вопроса -> список номеров кл. слов
                     47: 
                     48: $ck2v            = "${dir}ck2v"; # номер ключевого слова -> список вопросов
                     49: 
                     50: $warn            = "${dir}warn"; # варнинги
                     51: 
                     52: $kquotes       = "${dir}kquotes";
                     53: 
                     54: $ewordlist      = "${dir}ewordlist";
                     55: 
                     56: $kwordlist      = "${dir}kwordlist";
                     57: 
                     58: $vwordlist      = "${dir}vwordlist"; # Список символосочетаний. Разделители -- пробелы.
                     59: 
                     60: $wordlist      = "${dir}wordlist";
                     61: 
                     62: $dwordlist     = "${dir}dwordlist";
                     63: 
1.4       roma7      64: @dictionaries  = ("${dictdir}dict.koi", "${dictdir}mydict.koi",$newdict);
1.2       boris      65: 
                     66: $newdictionary = 'newdict.koi';
                     67: 
                     68: $rules         = 'raff.koi';
                     69: 
                     70: $compound_keys = 'compound_keys';
                     71: 
                     72: $versions      = "${dir}serrors";
                     73: 
                     74: $nf            = "${dir}gwords";
                     75: 
                     76: $newnf         = "${dir}newgwords";
                     77: 
                     78: $newerrors     = "${dir}newerrors";
                     79: 
                     80: $sorterrors    = 'se.pl';
                     81: 
                     82: $table         = "${dir}nests";
                     83: 
                     84: $newtable      = "${dir}newnests";
                     85: 
                     86: $errors        = "${dir}errors";
                     87: 
                     88: $base          = 'chgk'; # Имя базы
                     89: 
                     90: $checkaffix    = 'fw.pl';
                     91: 
                     92: $check         = 'check.pl';
                     93: 
                     94: $checkword     =  'cw.pl';
                     95: 
                     96: $singleaffix   = 'sa.pl';
                     97: 
                     98: $info          = "${dir}info";
                     99: 
                    100: $often         = 10000;
                    101: 
                    102: $seldom        =     0;
                    103: 
                    104: $ctable        = "${dir}ctable";
                    105: 
                    106: $cnf           = "${dir}cnf";
                    107: 
                    108: $proxlimit     = 20;
                    109: 
                    110: $equal         = "equall";
                    111: 
                    112: $equals       = "${dir}equals.txt"; # имя файла, в который будет записываться 
                    113:                                     # список одинаковых вопросов
                    114: 
                    115: $vlist        = "${dir}vlist";     # файл, в который будут писаться списки вопросов, 
                    116:                                    # в которых есть слово
                    117: 
                    118: $alike        = "${dir}alike";     #кандидаты на похожесть

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