Транслитерация кириллицы в perl. Lingua::Translit
Главная → Perl → Транслитерация кириллицы в perl
В продолжении темы парсинга входных параметров текстовых полей с помощью javascript-фильтра, хочу поделится отличной находкой Lingua::Translit. Модуль лежит в CPAN, здесь. Это на случай если требуется создать еще более удобную форму. Юзер пишет все что хочет, а на выходе имеем то что нужно.
Например, если нужно автоматом создать URL для страницы через транслит h1.
Код:
use Lingua::Translit; my $str = 'Новая статья про транслит.'; my $tr = new Lingua::Translit("GOST 7.79 RUS"); my $result; if ($tr->can_reverse()) { $result = $tr->translit($str); }