[Moscow.pm] Транслитерация

[Alexander Lourier]

On Wednesday 25 November 2009 09:27:00 Dmitry E. Oboukhov wrote:
> А кто что использует в окружении use utf8 по возможности максимально
> живое и простое для сабжа?
>
> нужно пока только в одну сторону - русский->транслит

use utf8;
use Lingua::Translit;
my $tr = new Lingua::Translit('Streamlined System BUL');
print $tr->translit("Работает даже Шарифулин!\n");

$ ./test.pl
Rabotaet dazhe Sharifulin!