RCS file: /usr/src/CVS/Aff_2_Perl/aff_2_perl.pl,v Working file: aff_2_perl.pl head: 1.4 branch: locks: strict access list: symbolic names: keyword substitution: kv total revisions: 4; selected revisions: 4 description: ---------------------------- revision 1.4 date: 2002/11/26 10:50:54; author: gosha; state: Exp; lines: +3 -6 Поправил в type 3 и 4 детектирование регулярных выражений, теперь $f = '' считаем REG ---------------------------- revision 1.3 date: 2002/11/25 23:59:57; author: gosha; state: Exp; lines: +202 -79 Добавил type = 4, унифицировал код в type=3 и type = 4 и записал частично отдельной процедурой type_34x_pp() ---------------------------- revision 1.2 date: 2002/11/24 17:46:36; author: gosha; state: Exp; lines: +370 -145 Сделал все более цивилизованно Добавил коментарии к коду Прочитал таки по диагонали man 5 ispell... Короче все комментарии внутри. ---------------------------- revision 1.1 date: 2002/11/23 18:02:25; author: gosha; state: Exp; Преобразует affix файлы ( с некоторой ручной правкой ) в код для perl =============================================================================