--- db/prgsrc/chgk.cnf	2001/10/31 03:00:07	1.1
+++ db/prgsrc/chgk.cnf	2001/10/31 03:07:18	1.2
@@ -1,105 +1,106 @@
-$dir='result/';
-
-$debug=0;
-
-$maxqsize      = 3;  #максимальный размер учитываемых закавыченных фраз
-
-$maxwsize      = 30;  #максимальный размер учитываемых слов
-
-$stderr        = "errors";
-
-$unknown       = "unknown";
-
-$dumprs        = "dumprs";
-
-$warnings      = "warnings";
-
-$in2out        = "in2out";
-
-$minstop=200000;
-
-$qnumber       = 500000; # обрабатываются вопросы, ID которых меньше чем $qnumber.
-                         # Чтобы обработать все вопросы, просто укажите 
-                         # достаточно большое значение
-
-$newdict       = "ndict.koi";
-
-$kwords        = "${dir}kwords";
-
-$v2k            = "${dir}v2k"; # номер вопроса -> список кл. слов
-
-$k2v            = "${dir}k2v"; # номер ключевых слов -> список  вопросов
-
-$cv2k            = "${dir}cv2k"; # номер вопроса -> список номеров кл. слов
-
-$ck2v            = "${dir}ck2v"; # номер ключевого слова -> список вопросов
-
-$warn            = "${dir}warn"; # варнинги
-
-$kquotes       = "${dir}kquotes";
-
-$ewordlist      = "${dir}ewordlist";
-
-$kwordlist      = "${dir}kwordlist";
-
-$vwordlist      = "${dir}vwordlist"; # Список символосочетаний. Разделители -- пробелы.
-
-$wordlist      = "${dir}wordlist";
-
-$dwordlist     = "${dir}dwordlist";
-
-@dictionaries  = ('dict.koi', 'mydict.koi',$newdict);
-
-$newdictionary = 'newdict.koi';
-
-$rules         = 'raff.koi';
-
-$compound_keys = 'compound_keys';
-
-$versions      = "${dir}serrors";
-
-$nf            = "${dir}gwords";
-
-$newnf         = "${dir}newgwords";
-
-$newerrors     = "${dir}newerrors";
-
-$sorterrors    = 'se.pl';
-
-$table         = "${dir}nests";
-
-$newtable      = "${dir}newnests";
-
-$errors        = "${dir}errors";
-
-$base          = 'chgk'; # Имя базы
-
-$checkaffix    = 'fw.pl';
-
-$check         = 'check.pl';
-
-$checkword     =  'cw.pl';
-
-$singleaffix   = 'sa.pl';
-
-$info          = "${dir}info";
-
-$often         = 10000;
-
-$seldom        =     0;
-
-$ctable        = "${dir}ctable";
-
-$cnf           = "${dir}cnf";
-
-$proxlimit     = 20;
-
-$equal         = "equall";
-
-$equals       = "${dir}equals.txt"; # имя файла, в который будет записываться 
-                                    # список одинаковых вопросов
-
-$vlist        = "${dir}vlist";     # файл, в который будут писаться списки вопросов, 
-                                   # в которых есть слово
-
-$alike        = "${dir}alike";     #кандидаты на похожесть
\ No newline at end of file
+#!/usr/bin/perl
+$dir='result/';
+
+$debug=0;
+
+$maxqsize      = 3;  #максимальный размер учитываемых закавыченных фраз
+
+$maxwsize      = 30;  #максимальный размер учитываемых слов
+
+$stderr        = "errors";
+
+$unknown       = "unknown";
+
+$dumprs        = "dumprs";
+
+$warnings      = "warnings";
+
+$in2out        = "in2out";
+
+$minstop=200000;
+
+$qnumber       = 500000; # обрабатываются вопросы, ID которых меньше чем $qnumber.
+                         # Чтобы обработать все вопросы, просто укажите 
+                         # достаточно большое значение
+
+$newdict       = "ndict.koi";
+
+$kwords        = "${dir}kwords";
+
+$v2k            = "${dir}v2k"; # номер вопроса -> список кл. слов
+
+$k2v            = "${dir}k2v"; # номер ключевых слов -> список  вопросов
+
+$cv2k            = "${dir}cv2k"; # номер вопроса -> список номеров кл. слов
+
+$ck2v            = "${dir}ck2v"; # номер ключевого слова -> список вопросов
+
+$warn            = "${dir}warn"; # варнинги
+
+$kquotes       = "${dir}kquotes";
+
+$ewordlist      = "${dir}ewordlist";
+
+$kwordlist      = "${dir}kwordlist";
+
+$vwordlist      = "${dir}vwordlist"; # Список символосочетаний. Разделители -- пробелы.
+
+$wordlist      = "${dir}wordlist";
+
+$dwordlist     = "${dir}dwordlist";
+
+@dictionaries  = ('dict.koi', 'mydict.koi',$newdict);
+
+$newdictionary = 'newdict.koi';
+
+$rules         = 'raff.koi';
+
+$compound_keys = 'compound_keys';
+
+$versions      = "${dir}serrors";
+
+$nf            = "${dir}gwords";
+
+$newnf         = "${dir}newgwords";
+
+$newerrors     = "${dir}newerrors";
+
+$sorterrors    = 'se.pl';
+
+$table         = "${dir}nests";
+
+$newtable      = "${dir}newnests";
+
+$errors        = "${dir}errors";
+
+$base          = 'chgk'; # Имя базы
+
+$checkaffix    = 'fw.pl';
+
+$check         = 'check.pl';
+
+$checkword     =  'cw.pl';
+
+$singleaffix   = 'sa.pl';
+
+$info          = "${dir}info";
+
+$often         = 10000;
+
+$seldom        =     0;
+
+$ctable        = "${dir}ctable";
+
+$cnf           = "${dir}cnf";
+
+$proxlimit     = 20;
+
+$equal         = "equall";
+
+$equals       = "${dir}equals.txt"; # имя файла, в который будет записываться 
+                                    # список одинаковых вопросов
+
+$vlist        = "${dir}vlist";     # файл, в который будут писаться списки вопросов, 
+                                   # в которых есть слово
+
+$alike        = "${dir}alike";     #кандидаты на похожесть