ru.unix.bsd

 
 - RU.UNIX.BSD ------------------------------------------------------------------
 From : Alexander Titaev                     2:5070/66      09 Aug 2007  21:38:52
 To : Eugene Grosbein
 Subject : Re: iconv & translit
 -------------------------------------------------------------------------------- 
 

 EG> 08 авг 2007, среда, в 17:19 KRAST, Aleksey Cheusov написал(а):
 
  EG>>> Можно ли при помощи iconv(1) транслитерировать русский текст?
  EG>>> Почитал man iconv_open, попробовал так:
  EG>>> $ echo бла-бла-бла | iconv -f koi8-r -t ASCII//TRANSLIT
  EG>>> iconv: (stdin): cannot convert
  AC>> http://mova.org/~cheusov/pub/latinica
 
 EG> Спасибо, ещё одна полезняшка :-)
 EG> Hо в этот раз мне б при помощи iconv...
 
 у кого то стырил
 sub koi2rus 
 {
     my $str = @_[0];                      # copy the arguments
          
     $str =~
 tr/\xA3\xB3\xC1-\xD0\xD2-\xD5\xD7-\xDA\xDC\xDF\xE1-\xF0\xF2-\xF5\xF7-\xFA\xFC\xF
 F/eEabcdefgxijklmnoprs
 tuv`ize'ABCDEFGXIJKLMNOPRSTUV`IZE'/;
          
     $str =~ s/\xC0/ju/g ;
     $str =~ s/\xD1/ja/g ;
     $str =~ s/\xD6/zh/g ;
     $str =~ s/\xDB/sh/g ;
     $str =~ s/\xDD/sch/g;
     $str =~ s/\xDE/ch/g ;
     $str =~ s/\xE0/Ju/g ;
     $str =~ s/\xF1/Ja/g ;
     $str =~ s/\xF6/Zh/g ;
     $str =~ s/\xFB/Sh/g ;
     $str =~ s/\xFD/Sch/g;
     $str =~ s/\xFE/Ch/g ;
     $str =~ s/ /_/g ;
 
     return $str;
 }
 
 -- 
 Sanyo     mailto:tit@irk.ru
 
 --- tin/1.8.2-20060425 ("Shillay") (UNIX) (FreeBSD/6.2-RELEASE (i386))
  * Origin: The_Bulls echo gate (2:5070/66)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    Re: iconv & translit   Eugene Grosbein   08 Aug 2007 21:38:15   Re: iconv & translit   Aleksey Cheusov   09 Aug 2007 11:34:43   Re: iconv & translit   Alexander Titaev   09 Aug 2007 21:38:52