File:  [Local Repository] / db / prgsrc / chgk.cnf
Revision 1.3: download - view: text, annotated - select for diffs - revision graph
Tue Nov 20 14:38:37 2001 UTC (22 years, 6 months ago) by boris
Branches: MAIN
CVS tags: HEAD
moved to ../dict

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

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