Документ взят из кэша поисковой машины. Адрес оригинального документа : http://herba.msu.ru/shipunov/software/tex/t2log Дата изменения: Fri Jan 12 12:16:12 2001 Дата индексирования: Mon Oct 1 23:02:14 2012 Кодировка: koi8-r

#!/usr/bin/perl
#Perekodiruet vnutrennie soobsheniya TEX'a (Overfull i Underfull)
#c ANSI v KOI8-R
#Pri ehtom esli v log-fajle bolee odnoj pustoj stroki podryad,
#to na vyhchode budet toljko odna

#(C) Anna Shipunova. E-mail: anna@shipunov.dnttm.ru

#version 1.3, более точно задана область

#BEGIN {$/=""}

while(<>){
if((/Overfull/ || /Underfull/) .. /^$/)
{tr/юабцдефгхийклмнопярстужвьызшэщчъЮАБЦДЕФГХИЙКЛМНОПЯРСТУЖВЬЫЗШЭЩЧЪ/АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмнопрстуфхцчшщъыьэюя/;}
print;
}

#