File:  [Local Repository] / db / prgsrc / chgk.cnf
Revision 1.7: download - view: text, annotated - select for diffs - revision graph
Sat Apr 24 18:04:14 2010 UTC (14 years ago) by roma7
Branches: MAIN
CVS tags: HEAD
chgk.cnf

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

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