Linux за българи: Форуми

Здравейте, още едно тъпо нещо, което ми вгорчава живота.

Принципно имам масив на ПХП, който играе ролята за транслитериращ масив:

GeSHi (PHP):
function cyr2lat ($string) {
$table = array(
'а'=>'a', 'б'=>'b', 'в'=>'v', 'г'=>'g', 'д'=>'d',
'е'=>'e', 'ж'=>'j', 'з'=>'z', 'и'=>'i', 'й'=>'y',
'к'=>'k', 'л'=>'l', 'м'=>'m', 'н'=>'n', 'о'=>'o',
'п'=>'p', 'р'=>'r', 'с'=>'s', 'т'=>'t', 'у'=>'u',
'ф'=>'f', 'х'=>'h', 'ц'=>'c', 'ч'=>'ch', 'ш'=>'sh',
'щ'=>'sht', 'ъ'=>'a', 'ь'=>'', 'ю'=>'yu', 'я'=>'ya',
'А'=>'A', 'Б'=>'B', 'В'=>'V', 'Г'=>'G', 'Д'=>'D',
'Е'=>'E', 'Ж'=>'J', 'З'=>'Z', 'И'=>'I', 'Й'=>'Y',
'К'=>'K', 'Л'=>'L', 'М'=>'M', 'Н'=>'N', 'О'=>'O',
'П'=>'P', 'Р'=>'R', 'С'=>'S', 'Т'=>'T', 'У'=>'U',
'Ф'=>'F', 'Х'=>'H', 'Ц'=>'C', 'Ч'=>'Ch', 'Ш'=>'Sh',
'Щ'=>'Sht', 'Ъ'=>'A', 'ь'=>'', 'Ю'=>'Yu', 'Я'=>'Ya',
);
 
return strtr($string, $table);
}
 

понеже не ми се играе да преписвам пак цялата азбука исках да ползвам функцията array_flip(), която сменя местата на ключа и стойността на всеки елемент т.е. по този начим ще имам с едно писане транслитерация в двете посоки.

Функцията наистина общъща местата, обаче през strtr($string, $table); не минават правилно utf-8 кирилските букви. Някакви идеи как да го направя така че да работи?

http://bg.php.net/mb_strstr
Подобни Multibyte функции има алтернативи на повечето функции за работа със низове.

Нещо не ми харесва това :)

Как ще се транслитерира право и обратно "схващане" при условие, че
Х => H
С => S

но

SH => Ш

VladSun, ти отрепа всичко детско в мене... Никога не бях се замислял за тия думи... По принцип като я правя тая простотия с масивите слагам тия букви "ш", "щ" и т.н. в началото, така че да хване първо тях, обаче за тоя случай не ми го побира акълът... Освен с някакви предварително въведени думи, ама това пак си е рисковано...

nov_chovek, ти защо реши да използваш strstr? Аз тия функция я използвам да намеря дали в някой низ се съдържа друг низ, и в частни случаи за да ми върне къде точно се намира тоя низ... Да нямаш предвид str_replace?

Сега изпробвах всичките преводачи от латиница към кирилица, които намерих в нета - ни един не работи както трябва... Явно наистина това освен с предварително зададени думи няма как да се реши.

А на теб защо точно ти трябва, ако точно искаш да правиш транслитерация ще имаш проблеми, обаче ако превеждаш думи за да търсиш после по тях е една съвсем различна история.

VladSun, ти отрепа всичко детско в мене... Никога не бях се замислял за тия думи... По принцип като я правя тая простотия с масивите слагам тия букви "ш", "щ" и т.н. в началото, така че да хване първо тях, обаче за тоя случай не ми го побира акълът... Освен с някакви предварително въведени думи, ама това пак си е рисковано...

:P Няма просто решение за този проблем според мен.

nov_chovek, ти защо реши да използваш strstr? Аз тия функция я използвам да намеря дали в някой низ се съдържа друг низ, и в частни случаи за да ми върне къде точно се намира тоя низ... Да нямаш предвид str_replace?

Не  е strstr, a strtr - http://php.net/manual/en/function.strtr.php

А, вярно... Между другото, на abv транслатора е написан както трябва... Дори ако примерно напишеш нещо от сорта на "Vie ste ste tam" първото "ste" става "ще", а второто "сте"... Не е като да не са си поиграли...

окей, направих го, но както каза VladSun не се случват нещата поради комбинацията на букви в думите.

Мислите ли, че може да се направи някакъв php клас, който да подава читава транслитерация от кирилица на латиница?

Ако има навити съм готов да дам някой лев (в разумни граници), като след това кода може да се пусне GPL или там както прецени кодера. Ако има мераклии нека пишат лично съобщение.

Проблема е сериозен.
Транслитерация обратно от Lat->Cyr както беше казано е невъзможна, понеже латиницита има много по малко символи и при правата транслитерация  Cyr -> Lat се губи информация.

тук са много хубаво описани изискванията:
http://bg.wikisource.org/wiki/Закон_за_транслитерацията ($2)

Обаче не става с просто заместване на стрингове щото според закона има изключения:

ИЯ в края на думата става ia а не ya
Например София -> Sofia а НЕ Sofiya

другото изключение е етнонима БЪЛГ, който трябва да се транслитерира BULG а не BALG

България -> Bulgaria а не Balgariya  ;D

Има и още подробности:
Ако трябва да се запазят Малките и големите букви, така както е в оригиналният кирилски стринг - става още по сложно например:
ЖРЕБЧЕВО->ZhREBChEVO
в този случай просто заместване на Ж с Zh и Ч с Ch не изглежда хубаво щото имаме мешаница на главни и малки букви в превода.
Дали ще бъде главна или малка буква зависи от това каква е следваща буква в кирилският стринг.

А и освен това този закон явно по подразбиране приема че това е транслитерация към Английски. Ако преведените стрингове на латиница трябва да се четат от немец изобщо няма да изглежда правилно.
на немски е:
Ж -> Sch
Х -> Ch
Ц -> Z
Ч -> Tsch
Ш -> Sch
Щ -> Scht

Т.е. за другите езици са необходими и различни таблици.



 

принципно искам да транслитерирам съществителни собствени имена (вкл. градове, улици и т.н.), които не се превеждат, а се транслитерират. Значи с кофти задача съм се хванал :)

Имам такова работещо решение и точно за такова го правих. Даже мислех да го пускам публично, но се замотах.......

Обаче изисква pcre-то да е компилирано (заради кирилцата) с
./configure --enable-utf8 --enable-unicode-properties

в fedora/RH --enable-unicode-properties липсва.

например без това $str=preg_replace('/(бълг)/ui', 'bulg', $str);
модификатора /u няма да работи :'( и разни други работи с кирилицата и preg_replace не работеха. Не открих и никакво друго алтернативно решение освен пркомпилирането на pcre.

Ако искаш ще го пусна тук, но трябва да го вадя от код и може да пропусна някоя зависмост. 3-4 функции са

Naka, много ще съм ти благодарен ако го направиш! Ако трябва ще прекомпилирам.

Добре де ще вадя.

transliteration.php

GeSHi (PHP):
<?php
// този файл и всички локализиращи файлове са кодирани в utf-8
 
// в този файл се описват масивите за транслитерация от $cyr към различните езици
 
$bg = 	  array('А', 'а',
		'Б', 'б',
		'В', 'в',
		'Г', 'г',
		'Д', 'д',
		'Е', 'е',
		'Ж', 'ж',
		'З', 'з',
		'И', 'и',
		'Й', 'й',
		'К', 'к',
		'Л', 'л',
		'М', 'м',
		'Н', 'н',
		'О', 'о',
		'П', 'п',
		'Р', 'р',
		'С', 'с',
		'Т', 'т',
		'У', 'у',
		'Ф', 'ф',
		'Х', 'х',
		'Ц', 'ц',
		'Ч', 'ч',
		'Ш', 'ш',
		'Щ', 'щ',
		'Ъ', 'ъ',
		'Ь', 'ь',
		'Ю', 'ю',
		'Я', 'я');
// АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЬЮЯ
// ABCDEFGHIJKLMNOPQRSTUVWXYZ
// abcdefghijklmnopqrstuvwxyz
 
 
// http://bg.wikisource.org/wiki/Закон_за_транслитерацията
// правилата са за превод към латиница, но се подразбира English
// за другите езици (например Немски) важат други правила, които не са описани в закона.
//
// (2) Буквеното съчетание „ия“, когато е в края на думата, се изписва и предава чрез „ia“. Sofia
// Чл. 6. Името на българската държава се изписва и предава на латиница в съответствие с установената // традиция: България — Bulgaria
// Bulgaria Bulgarska, Bulgarski
 
// $table_ia/bulg изключения.
// Тези 2 таблици се използват за транслитерация само след цялостен match на стринга 'ия' или 'бълг'
// как точно се мачва (например накрая на думата за 'ия') се определя от самият preg_replace()
// идеята на използването им е, че така може да се запази Case-а на оригиналните букви.
$table_ia=array('и'=>'i',
		'я'=>'a',
		'И'=>'I',
		'Я'=>'A');
 
$table_bulg=array('б'=>'b',
		'ъ'=>'u',
		'л'=>'l',
		'г'=>'g',
		'Б'=>'B',
		'Ъ'=>'U',
		'Л'=>'L',
		'Г'=>'G');
 
$en = 	  array('A', 'a',
		'B', 'b',
		'V', 'v',
		'G', 'g',
		'D', 'd',
		'E', 'e',
		'Zh','zh',
		'Z', 'z',
		'I', 'i',
		'Y', 'y',
		'K', 'k',
		'L', 'l',
		'M', 'm',
		'N', 'n',
		'O', 'o',
		'P', 'p',
		'R', 'r',
		'S', 's',
		'T', 't',
		'U', 'u',
		'F', 'f',
		'H', 'h',
		'Ts','ts',
		'Ch','ch',
		'Sh','sh',
		'Sht','sht',
		'A', 'a',
		'Y', 'y',
		'Yu','yu',
		'Ya','ya');
 
 
// http://de.wikipedia.org/wiki/Kyrillisches_Alphabet#Bulgarisch
// но: България — Bulgaria
// правилото за ия (ia) се запазва в края на думата
$de = 	  array('A', 'a',
		'B', 'b',
		'W', 'w',
		'G', 'g',
		'D', 'd',
		'E', 'e',
		'Sch','sch',
		'S', 's',
		'I', 'i',
		'J', 'j',
		'K', 'k',
		'L', 'l',
		'M', 'm',
		'N', 'n',
		'O', 'o',
		'P', 'p',
		'R', 'r',
		'S', 's',
		'T', 't',
		'U', 'u',
		'F', 'f',
		'Ch', 'ch',
		'Z','z',
		'Tsch','tsch',
		'Sch','sch',
		'Scht','scht',
		'A', 'a',
		'J', 'j',
		'Ju','ju',
		'Ja','ja');
?>

GeSHi (PHP):
require "transliteration.php";
// твърди параметри за експорт;
$GLOBALS['bg']=$bg;
$GLOBALS['table_ia']=$table_ia;
$GLOBALS['table_bulg']=	$table_bulg;
 
function mb_is_upper($str)
{
// препинателните знаци, шпация, '', и край на реда
// се третират като главни букви и за тях тази функция връща 'true'
$upper = mb_strtoupper($str,'UTF-8');
 
return $str === $upper;
}
 
/*
function ia_function($matches)
{
// as usual: $matches[0] is the complete match
// $matches[1] the match for the first subpattern
//
// за достъп към елемент от стринга не може да се използва формата $str[1] - работи само за ASCII
// не може да се използва и substr() - работи само за ASCII
 
$str=$matches[0];
// print '|'.mb_substr($str,0,1,'UTF-8').mb_is_upper(mb_substr($str,0,1,'UTF-8')).'|';
 
if (mb_is_upper(mb_substr($str,0,1,'UTF-8'))) $ret='I'; else  $ret='i';
if (mb_is_upper(mb_substr($str,1,1,'UTF-8'))) $ret.='A'; else  $ret.='a';
 
return $ret;
}
 
function bulg_function($matches)
{
// Тази функция предполага че всички замествания на 'бълг' се състоят от по 1-ин символ
// например за всички езици Ъ->1символ(А); Следствие на това е,
// че не нужна проверка за следващият символ за запазване на 'casе'-а, както се прави в replace_function()
// global $bg, $target;
 
$S1=$matches[1]; // 'бълг'
 
// print $S1;
 
if (mb_is_upper(mb_substr($S1,0,1,'UTF-8'))) $ret='B'; else  $ret='b';
if (mb_is_upper(mb_substr($S1,1,1,'UTF-8'))) $ret.='U'; else  $ret.='u';
if (mb_is_upper(mb_substr($S1,2,1,'UTF-8'))) $ret.='L'; else  $ret.='l';
if (mb_is_upper(mb_substr($S1,3,1,'UTF-8'))) $ret.='G'; else  $ret.='g';
 
return $ret;
}
*/
 
function ia_function($matches)
{
// as usual: $matches[0] is the complete match
// $matches[1] the match for the first subpattern
//
// за достъп към елемент от стринга не може да се използва формата $str[1] - работи само за ASCII
// не може да се използва и substr() - работи само за ASCII
global $table_ia;
 
$S1=$matches[1];
 
$ST=strtr($S1,$table_ia);
 
return $ST;
}
 
function bulg_function($matches)
{
// Тази функция предполага че всички замествания на 'бълг' се състоят от по 1-ин символ
// например за всички езици Ъ->1символ(А); Следствие на това е,
// че не нужна проверка за следващият символ за запазване на 'casе'-а, както се прави в replace_function()
global $table_bulg;
 
$S1=$matches[1]; // 'бълг'
 
// print '|'.$S1;
// 0.43 сек. (10000 цикъла) strtr($S1,$table);
// 0.70 сек. (10000 цикъла) str_replace()
// 1.42 сек. (10000 цикъла) 8 броя $str=preg_replace('/б/u', 'b', $S1);
// 2.62 сек. (10000 цикъла) 4 броя проверки (mb_is_upper(mb_substr($S1,0,1,'UTF-8'))) $ret='B'; else  $ret='b';
// 5 сек.    (10000 цикъла) най-бавно чрез цикъл и търсене в масива $bg, $target
 
$ST=strtr($S1,$table_bulg);
 
return $ST;
}
 
 
function replace_function($matches)
{
global $bg, $target;
 
$S1=$matches[1];
$S2=$matches[2];
//print '|'.$S1.$S2.'|';
 
// ако не е намерен символа в бг таблицата връща самият символ например:ы
if ( ($key = array_search($S1, $bg)) === FALSE ) return $S1;
 
$ST=$target[$key];
 
// print '['.$S1.']'.($key & 1);
// print '['.$S1.']'.mb_strlen($ST,'UTF-8');
 
// бърза проверка за главна буква: $key(четно 0,2,4)-главна;   $key(нечетно 1,3,5)-малка;
// проверка за четност
// ($key & 1) - 1 нечетно; 0 четно;
 
// ЖРЕБЧЕВО->ZhREBChEVO
//         ->ZH...CH...
// Ако текущият заместван символ е главна буква (и заместващият я стринг е с повече от 2 букви)
// И следващият символ е главна буква то целият заместващ я стринг се капитализира Zh->ZH
// проверката за mb_strlen($ST,'UTF-8')>1 се предодврати ненужното извикване на mb_is_upper($S2)
if ( (!($key & 1) AND mb_strlen($ST,'UTF-8')>1) AND mb_is_upper($S2)) return mb_strtoupper($ST,'UTF-8');
 
return $ST;
}
 
 
function transliterate($cyrstr, $lang, $STRICT_CASE=true)
{
// връща транслителиран стринг към съответният език
// транслитерационните масиви трябва да се заредени предварително.
 
// STRICT_CASE задава дали да се запазват case-а на буквите както е при оригиналния текст
// STRICT_CASE = true 	Запазва се case-а
// STRICT_CASE = false	Не се запазва case-а. Всичко се конвертира към малки букви
// и накрая се капитализира първата буква на всяка дума.
 
// STRICT_CASE == true е 6 пъти по-бавен от без STRICT_CASE
// 6.4 сек. (10000 цикъла) transliterate('жжжжжж', 'en', false);
// 35  сек. (10000 цикъла) transliterate('жжжжжж', 'en', true);
 
$target=$GLOBALS[$lang];
// това е нужно за _callback функциите
$GLOBALS['target']=$target;
 
// pcretest -C
//
// https://bugzilla.redhat.com/show_bug.cgi?id=457064
// http://gaarai.com/2009/01/31/unicode-support-on-centos-52-with-php-and-pcre/
// http://bugs.centos.org/view.php?id=3252
//
// Compilation failed: PCRE does not support \L, \l, \N, \U, or \u 
// трябва пакета да се прекомпилира със %configure --enable-utf8 --enable-unicode-properties
//  --enable-utf8 е зададено в src.rpm но --enable-unicode-properties не е
 
setlocale(LC_CTYPE,'bg_BG.utf8');
 
// документация
// http://www.pcre.org/pcre.txt
// \b	matches a word boundary (only ASCII letters recognized - all with values less than 256 )
// \p{Cyrillic} -- match Cyrillic letter
// \P{Cyrillic} -- match NON Cyrillic letter
// \p{L} 	letter
// \p{Ll}	Lower case letter
// \p{Lu}	Upper case letter
 
 
if ($STRICT_CASE)
{
// !!! за да работи правилно case-insensitive трябва да има задължително u за модификатор /xxx/ui
// [^a-zA-Zа-яА-Я0-9]|$ маркира край на думата - всеки не буквен знак или край на стринга $
//$str=preg_replace('/ия(?=[^a-zA-Zа-яА-Я0-9]|$)/ui', 'ia', $cyrstr);
 
// Заменя ия->ia в края на думите като запазва малките и големите букви в оригиналния текст
$str=preg_replace_callback('/(ия)(?=[^a-zA-Zа-яА-Я0-9]|$)/ui', 'ia_function', $cyrstr);
 
// етнонима 'бълг' - незвисимо къде е се транслителира като 'bulg', частен случай е България-Bulgaria
$str=preg_replace_callback('/(бълг)/ui', 'bulg_function', $str);
 
// ВАЖНО! (?=.?) е Lookahead assertion за всякакъв символ .? 0 или 1 път.
// Въпреки че целият израз е в скоби той не се захваща и не може да се използва като $2
// Но когато патъна вътре в Lookahead израза е обграден в скоби (?=(.?)) той се захваща като $2
// Като при това целият израз си остава Lookahead, без да оказва влияние на целият патън
// това е захващане на 1 пореден Кирилски символ $1 + инфо за следващият символ в $2 (какъвто и да е той)
// /(\p{Cyrillic})(.?)/ - това по същият начин захваща $1 и $2 но скача на +2 знака при следващият цикъл
// докато комбинацията с Lookahead скача на +1 - т.е. обхожда всеки пореден знак
$str=preg_replace_callback('/(\p{Cyrillic})(?=(.?))/u', 'replace_function', $str);
 
}
else 
{
$str=preg_replace('/(ия)(?=[^a-zA-Zа-яА-Я0-9]|$)/ui', 'ia', $cyrstr);
$str=preg_replace('/(бълг)/ui', 'bulg', $str);
$str=str_replace($GLOBALS['bg'], $target, $str);
$str=mb_convert_case($str, MB_CASE_TITLE, "UTF-8");
}
 
return $str;
}

Мисля че това е всичко.
първо трябва да заредиш масивите. transliterate.php

и след това:
transliterate('Това е само пример, София, България', 'en', false);

ако $STRICT_CASE==false игнорира спазването на всички малки и големи букви и работи много бързо. Ако обаче $STRICT_CASE==true работи много бавно щото гледа малките и големите букви да съвпадат точно и в транслителираният стринг.
Например: въведен стринг тип хакерско писане:
transliterate('ЖрЕбЧеВо', 'en', true);
ще го транслителира правилно така
ZhRеBchEvO ;D

общо взето транслитерацията (при не спазване на CASE-a) се извършва само от това:

GeSHi (PHP):
{
$str=preg_replace('/(ия)(?=[^a-zA-Zа-яА-Я0-9]|$)/ui', 'ia', $cyrstr);
$str=preg_replace('/(бълг)/ui', 'bulg', $str);
$str=str_replace($GLOBALS['bg'], $target, $str);
$str=mb_convert_case($str, MB_CASE_TITLE, "UTF-8");
}

ако успееш да оправиш кодировките и locale-тата всичко би трябвало да работи. Не мога да се сетя входящият стринг transliterate($cyrstr  ..... дали беше в cp1251 или в utf-8

А това не е ли само от кирилица към латиница?

Аз едно време бях правил един клас, който транслитерира кирилски низ към всичките възможни изписвания на латиница (примерно "живея" - zhiveq, jiveq, zhiweq, jiveq, zhiveya, jiveya и .т.н. да не ги изреждам всичките). Върши работа при търсене, ама за твоя случай мисля че няма да може да помогне. Общо взето от кирилица към латиница е лесно, но обратното няма да стане без някакви предварително въведени граматически правила.

обратното няма да стане без някакви предварително въведени граматически правила.

То да беше само граматика - "лесно" :) Ама е и лексика.

Горе-долу - правим търсене в правописния речник за всички думи съдържащи "проблемни" конфигурации на буквите, прилагаме граматиката към тях и получаваме речник на думите с различно транслитериране от това в алгоритъма. Би трябвало да се огледаме и за "транслитераторни омоними" - прим. "схат" и "шат" (имагинерни)

Общо взето от кирилица към латиница е лесно, но обратното няма да стане без някакви предварително въведени граматически правила.

Обратното няма каk да стане без изкуствен интелект и разпознаване на реч --- щото се губи информация още при правото преобразуване Cyr->Lat

Окей, значи заключението е, че транслитерация от латиница към кирилица е много трудно да стане. Така ли излиза?

Не може ли просто по правилата да се изготви алгоритъм!
Самата транслитерация е правило щом пише Zhrebchevo,  е ясно че в българския само първата буква е главна но няма думи с такива съгласни една до друг т.е. "зх" и явно става въпрос за "ж".
Май ... не е така както си мисля!Но не може да няма начин.
Имам предвид, че те правилата са измислени трябва само да се напише код с алгоритъм който да ги спазва!

има резон в думите ти edmon. Ако стринга се парсва първо по двойки и тройки букви и се търсят "zh", "sh", "sht" ...е ще има грешки но няма да е болка за умиране...

Едит: от друга страна пък как ще се познава "ъ" ? :)

но няма думи с такива съгласни една до друг т.е. "зх" и явно става въпрос за "ж".

иЗХод, беЗХарактерен... Т.е., всички думи, започващи с "х" и с представка "из" или "без", а те са достатъчно много. Със сигурност има и други случаи, за които не се сещам в момента.

Съвършена транслитерация от чужда азбука към основната азбука на даден език се постига само по един начин - речник с всички думи. Важи за всички езици. Описване на всички правила на даден език в кода също не е достатъчно за постигане на съвършена транслитерация - във всеки език има и изключения. Имаме късмета да ползваме азбука и език, предоставящи изписване на думите по същия начин, по който се четат, което ни позволява без речник да имаме добра транслитерация от кирилица към други азбуки. Повечето народи нямат и това :)
Така че, ако някой има желанието да създаде съвършена транслитерация, трябва да се заеме с изписването на речник. Не си губете времето в излишни главоблъсканици - ако имате нужда от транслитерация, но нямате възможност да изпишете речник, опишете основните транслитериращи символи и комбинации от символи и не се занимавайте повече - без речник транслитерацията от чужд език към български винаги ще е далеч от съвършенството ;)

GeSHi (Perl):
# преобразуване на латиницата в кирилица - дава добри резултати за лични имена
sub lat2cyr(){
        my $inStr = shift;
 
        $inStr =~ tr/[A-Z]/[a-z]/;
        $inStr =~ s/([a-zA-Z]+)/\u$1/g;
 
        $inStr =~ s/mitar/митър/g;  $inStr =~ s/r[au]st/ръст/g;
        $inStr =~ s/etar/етър/g;      $inStr =~ s/Kanch/Кънч/g;
        $inStr =~ s/nd[ae]r/ндър/g;
        $inStr =~ s/Dian/Диян/g;    $inStr =~ s/dian/диян/g;
        $inStr =~ s/aria/ария/g;     $inStr =~ s/l[iy]a/лия/g;
        $inStr =~ s/or[iy]a/ория/g; 
        $inStr =~ s/Lub/Люб/g;      $inStr =~ s/Lud/Люд/g;
        $inStr =~ s/diyal/дял/g;        $inStr =~ s/sica/сица/g;
        $inStr =~ s/Sia/Сия/g;
        $inStr =~ s/nguel/нгел/g;       $inStr =~ s/[CZ][wv]et/Цвет/g;  
        $inStr =~ s/ueorg/еорг/g;       $inStr =~ s/Can/Цан/g;
        $inStr =~ s/Con/Цон/g;         $inStr =~ s/Lyd[iy]a/Лидия/g;
        $inStr =~ s/S[yi]lv[yi]a/Силвия/g;      $inStr =~ s/Theo/Тео/g; 
        $inStr =~ s/Chris/Хрис/g;
 
        $inStr =~ s/[YJ]o?u/Ю/g;    $inStr =~ s/[yj]o?u/ю/g;
        $inStr =~ s/[YJ]o/Йо/g;     $inStr =~ s/([iaoue])[yj]o/$1йо/g;
        $inStr =~ s/[yj]o/ьо/g;
        $inStr =~ s/[YI]a/Я/g;      $inStr =~ s/[yi]a/я/g;
        $inStr =~ s/Sht/Щ/g;        $inStr =~ s/sht/щ/g;
        $inStr =~ s/Sh/Ш/g;         $inStr =~ s/sh/ш/g;
        $inStr =~ s/Ch/Ч/g;         $inStr =~ s/[Tt]?ch/ч/g;
        $inStr =~ s/T[sz]/Ц/g;      $inStr =~ s/t[sz]/ц/g;
        $inStr =~ s/Zh|J/Ж/g;       $inStr =~ s/zh|j/ж/g;
        $inStr =~ s/Ou/У/g;         $inStr =~ s/ou/у/g;
        $inStr =~ s/ss/с/g;         $inStr =~ s/off/ов/g;
        $inStr =~ s/x/кс/g;
 
# след като сме пообработили доста изключения да обърнем по-голямото
# количество буквил 
# долната команда това очевидно трябва да е на един ред!!!!
        $inStr =~ tr/[ABVGDEZIKLMNOPRSTUFHabvgdeziklmnoprstufhQqWwCcy]
/[АБВГДЕЗИКЛМНОПРСТУФХабвгдезиклмнопрстуфхЯяВвКкй]/;
 
        return $inStr;
};
sub cyr2lat(){
        my $inStr = shift;
 
        # правим всички главни букви малки
        $inStr =~ tr/[А-ЯA-Z]/[а-яa-z]/;
        # правим голяма първата буква на всяка дума
        $inStr =~ s/([a-zA-Z]+)/\u$1/g;
 
        $inStr =~ s/ългария/ulgaria/g;
        $inStr =~ s/ия([^а-я])/ia$1/g;
 
        $inStr =~ s/Ю/Yu/g;    $inStr =~ s/ю/yu/g;
        $inStr =~ s/Йо/Yo/g;   $inStr =~ s/[йь]о/yo/g;
        $inStr =~ s/Я/Ya/g;    $inStr =~ s/я/ya/g;
        $inStr =~ s/Щ/Sht/g;   $inStr =~ s/щ/sht/g;
        $inStr =~ s/Ш/Sh/g;    $inStr =~ s/ш/sh/g;
        $inStr =~ s/Ч/Ch/g;    $inStr =~ s/ч/ch/g;
        $inStr =~ s/Ц/Ts/g;    $inStr =~ s/ц/ts/g;
        $inStr =~ s/Ж/Zh/g;    $inStr =~ s/ж/zh/g;
        $inStr =~ s/[Ьь]//g;
 
        $inStr =~ tr/[абвгдезийклмнопрстуфхъ]/[abvgdeziyklmnoprstufha]/;
 
        return $inStr;
};
 

ето и моят принос към делото… това съм го писал за една системка, която се обръщат главно лични имена
кодът е на Perl, но ако на някой му трябва лесно ще може да го обърне в РНР
изключенията съм ги правил на прилично голям корпус, но разбира се, не може да се разчита, че на 100% ще е коректно… все пак точността, която съм постигнал съм счел за достатъчна

Съвършена транслитерация от чужда азбука към основната азбука на даден език се постига само по един начин - речник с всички думи. Важи за всички езици. Описване на всички правила на даден език в кода също не е достатъчно за постигане на съвършена транслитерация - във всеки език има и изключения.

съвършена транслитерация няма! речниковото обработване има доста недостатъци и дори не решава проблема, който ти си мислиш. така например за една дума може да има няколко транлитерации и трябва да се вкарва отделно логика да се решава коя дума е по-най-вярна. да не говорим, че речникът трябва да се поддържа актуален и чист от боклуци. също така заема значително повече памет и за големи езикови множества си е тегавиня…
умните хора са измислили и други инструменти, като речник също се използва, но в една нехомогенна система и по-скоро за обслужване на изключенията.

Не си губете времето в излишни главоблъсканици - ако имате нужда от транслитерация, но нямате възможност да изпишете речник, опишете основните транслитериращи символи и комбинации от символи и не се занимавайте повече - без речник транслитерацията от чужд език към български винаги ще е далеч от съвършенството ;)

винаги ще е далеч, но поне могат да се направят няколко крачки напред. така или иначе драскачите на шльокавица си списват както им дойде наум всичко, за което ги мразя, мразя… мразя-я-я-я-я-я…

Има още изключения:
4 -> Ч
6 -> Ш  ;D ;D ;D

За какво изобщо ви е небходима обратната транслитерация?

Айде правата има смисъл за да се предостави текст (не превод - а само имена) на чужденец който той ще може да го прочете.

Ами обратната? Да не е за търсене? Ако е за търсачки предполагам, че се изготвя някакъв междинен звуков образ на думите и по този звуков образ се сравняват. Mysql-а имаше нещо подобно.. SpellCheck -овете работят по подобен начин (gnu aspell).

Google-a предполагам също работи по подобен 'звуков' начин, но това не оправя проблемите - по скоро съдейства за налагането на световна Шльоковизация.

Цитат на: edmon в Feb 14, 2011, 19:53

но няма думи с такива съгласни една до друг т.е. "зх" и явно става въпрос за "ж".

иЗХод, беЗХарактерен... Т.е., всички думи, започващи с "х" и с представка "из" или "без", а те са достатъчно много. Със сигурност има и други случаи, за които не се сещам в момента.

без речник транслитерацията от чужд език към български винаги ще е далеч от съвършенството ;)

Преди 7-8 години като млад ентусиаст бях сканирал и ОCR-ирал правописния речник до буква 'Й' обаче ми писна! А в последствие загубих файловте :(

П.П. Има ли ентусиасти да си разделим някое пълно издание на правописен речник на по няколко букви и да ги из-по-на-сканираме! :)

П.П. Има ли ентусиасти да си разделим някое пълно издание на правописен речник на по няколко букви и да ги из-по-на-сканираме!

Категорично НЕ!!! Освен ако не плащат по 1 € на дума  [_]3 [_]3 [_]3

Преди 7-8 години като млад ентусиаст бях сканирал и ОCR-ирал правописния речник до буква 'Й' обаче ми писна! А в последствие загубих файловте :(

П.П. Има ли ентусиасти да си разделим някое пълно издание на правописен речник на по няколко букви и да ги из-по-на-сканираме! :)

Може, създай нов проект за правописен речник (мисля вече имаше един.. бгофис) и съм вътре и аз.

Забележка: След бърза проверка се оказа че нямам правописен речник - имам само Правоговорен (Пашов, Първев) София 1975 г.
т.е. ..кога им изтичат  авторските права .. или някой ако ги познава тези да ги пита за разрешение. Аз лично като незапознат даже не знам кой трябва да се пита Пашов и Първев или Издателство Наука и изкуство бул. руски 6 (ако още го има)