Skip to content

Instantly share code, notes, and snippets.

@shoorick

shoorick/lingua-translit-russian.pl

Created September 7, 2011 14:36
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save shoorick/1200739 to your computer and use it in GitHub Desktop.
Save shoorick/1200739 to your computer and use it in GitHub Desktop.
Download ZIP
Compare transliteration tables for Russian
Raw
lingua-translit-russian.pl
#!/usr/bin/perl
use Lingua::Translit;
my $sample = 'Эй, жлоб! Где туз? Прячь юных съёмщиц в шкаф.';
my $tr;
for ( 'ALA-LC RUS', 'ISO 9', 'DIN 1460 RUS', 'GOST 7.79 RUS', 'GOST 7.79 RUS OLD' ) {
$tr = new Lingua::Translit( $_ );
printf "%17s %s\n", $_, $tr->translit( $sample );
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment