Here's a fun table showing which languages LanguageIdentify recognizes correctly from the UN Human Rights example text:
Grid[Join[{{"Actual language",
"Recognized language"}}, {StringTrim[#[[2]], "UNHumanRights"],
LanguageIdentify[ExampleData[#]]} & /@
Select[ExampleData["Text"],
StringContainsQ[#[[2]], "UNHumanRights"] &]], Frame -> All,
Background -> {None, {LightGray}}]
