<?php
$ lang = new LangDetector ( ) ;
$ dir = " /Library/Dictionaries/Apple Dictionary.dictionary/Contents/Resources/ " ;
$ dutch = strip_tags ( file_get_contents ( $ dir . " Dutch.lproj/Body.data " ) ) ;
$ lang -> adddocument ( $ dutch , ' dutch ' ) ;
$ english = strip_tags ( file_get_contents ( $ dir . " English.lproj/Body.data " ) ) ;
$ lang -> adddocument ( $ english , ' english ' ) ;
$ finnish = strip_tags ( file_get_contents ( $ dir . " fi.lproj/Body.data " ) ) ;
$ lang -> adddocument ( $ finnish , ' finnish ' ) ;
$ spanish = strip_tags ( file_get_contents ( $ dir . " Spanish.lproj/Body.data " ) ) ;
$ lang -> adddocument ( $ spanish , ' spanish ' ) ;
$ italian = strip_tags ( file_get_contents ( $ dir . " Italian.lproj/Body.data " ) ) ;
$ lang -> adddocument ( $ italian , ' italian ' ) ;
$ french = strip_tags ( file_get_contents ( $ dir . " French.lproj/Body.data " ) ) ;
$ lang -> adddocument ( $ french , ' french ' ) ;
$ swedish = strip_tags ( file_get_contents ( $ dir . " sv.lproj/Body.data " ) ) ;
$ lang -> adddocument ( $ swedish , ' swedish ' ) ;
?>
FractalizeR's HabraSyntax Source Code Highlighter .
<?php
$ italian = "
Nel mezzo del cammin di nostra vita
mi ritrovai per una selva oscura
ché la diritta via era smarrita.
" ;
echo $ italian , " \n " , " is " , $ lang -> detect ( $ italian ) , " \n " ;
$ finnish = "
Suomalainen on sellainen, joka vastaa kun ei kysytä,
kysyy kun ei vastata, ei vastaa kun kysytään,
sellainen, joka eksyy tieltä, huutaa rannalla
ja vastarannalla huutaa toinen samanlainen.
" ;
echo $ finnish , " \n " , " is " , $ lang -> detect ( $ finnish ) , " \n " ;
$ dutch = "
zoals het klokje thuis tikt, tikt het nergens
" ;
echo $ dutch , " \n " , " is " , $ lang -> detect ( $ dutch ) , " \n " ;
$ spanish = "
Por qué los inmensos aviones
No se pasean com sus hijos?
Cuál es el pájaro amarillo
Que llena el nido de limones?
Por qué no enseñan a sacar
Miel del sol a los helicópteros?
" ;
echo $ spanish , " \n " , " is " , $ lang -> detect ( $ spanish ) , " \n " ;
$ swedish = "
Och knyttet tog av skorna och suckade och sa:
hur kan det kännas sorgesamt fast allting är så bra?
Men vem ska trösta knyttet med att säga: lilla vän,
vad gör man med en snäcka om man ej får visa den?
" ;
echo $ swedish , " \n " , " is " , $ lang -> detect ( $ swedish ) , " \n " ;
?>
FractalizeR's HabraSyntax Source Code Highlighter .
Nel mezzo del cammin...
is italian
Suomalainen on sellainen...
is finnish
zoals het klokje thuis tikt, tikt het nergens
is dutch
Por que los inmensos...
is spanish
Och knyttet tog av...
is swedish
<?php
$ nl = strip_tags ( file_get_contents ( ' www.ibuildings.nl ' ) ) ;
echo " IB NL reads as: " . $ lang -> detect ( $ nl ) , " \n " ;
$ uk = strip_tags ( file_get_contents ( ' www.ibuildings.co.uk ' ) ) ;
echo " IB Uk reads as: " . $ lang -> detect ( $ uk ) , " \n " ;
$ it = strip_tags ( file_get_contents ( ' www.ibuildings.it ' ) ) ;
echo " IB IT reads as: " . $ lang -> detect ( $ it ) , " \n " ;
?>
FractalizeR's HabraSyntax Source Code Highlighter .
IB NL reads as: english
IB UK reads as: english
IB IT reads as: italian
<?php
require_once ' Text/LanguageDetect.php ' ;
function detect ( $ text , $ l ) {
$ result = $ l -> detect ( $ text , 1 ) ;
if ( PEAR :: isError ( $ result ) ) {
return $ result -> getMessage ( ) ;
} else {
return key ( $ result ) ;
}
}
$ l = new Text_LanguageDetect ( ) ;
$ italian = "
Nel mezzo del cammin di nostra vita
mi ritrovai per una selva oscura
ché la diritta via era smarrita.
" ;
echo $ italian , " \n " , " is " , detect ( $ italian , $ l ) , " \n " ;
// ... ,
?>
FractalizeR's HabraSyntax Source Code Highlighter .
pear -d preferred_state=alpha install Text_LanguageDetect
Source: https://habr.com/ru/post/75512/
All Articles