|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Ilya Soldatkin 2:5020/175.2 09 Jun 2001 13:55:36 To : Stephen V Avdeyev Subject : Lingua::RU::Antimat (was regexp?) -------------------------------------------------------------------------------- Привет, Stephen! Можете посмотреть на мой модуль для замены мата на какое-нибудь более приличное слово. www.tcen.ru/antimat Это почти то, что Вы хотите. Заменяет безусловно не все, но довольно много. Английские буквы тоже распознает, за исключением многосложных гласных (я=>ja, ю=>ju). Hачал я это писать в январе этого года, только не для гостевой, а для чата. :) Сделал практически все, за исключением оформления веб-страничек. Так что, таким убогим оформлением пока не придирайтесь, через несколько дней будет лучше. Добавлял я слова в модуль следующим образом, брал текст из гостевой книги, где можно ругаться матом, и смотрел какие слова в этом тексте заменены, а какие - нет. Когда кол-во bip'ов стало меня удовлетворять - закончил. Поэтому вполне, возможно, что какие-то слова, я пропустил (особенно редко используемые окончания). SA> тупо в лоб: брать маты из словаря и искать в тексте SA> проблема: начинают заменять буквы на схожие латинские SA> всё бы ничего, могу поставить вначале перекодировку в русский алфавит, но SA> мне надо не отсеять тексты с матами, а замаскировать маты, чем-нить типа SA> [censored]. SA> если я перекодирую, то маскировать придётся прямо в перекодированном SA> тексте. С уважением, Илья Солдаткин --- ifmail v.2.15 * Origin: FidoNet Online - http://www.fido-online.com (2:5020/175.2) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/3300c87ca61c.html, оценка из 5, голосов 10
|