[devel] Нужна консультация по использованию perl-gettext

[Yura Zotov]

Проконсультируйте, пожалуйста, по использованию perl-gettext.

Вот кусок текста программы:

bindtextdomain( "qqq", "locale");
textdomain( "qqq");
print gettext( "Hello!"), "\n";

При установленной русской локали выводится "Привет!". Если
выполнить

LC_MESSAGES=de LANG=de ./test

получаем

perl: warning: Setting locale failed.
perl: warning: Please check that your locale settings:
	LANGUAGE = "ru_RU.KOI8-R",
	LC_ALL = (unset),
	LC_MESSAGES = "de",
	LC_MONETARY = "ru_RU.KOI8-R",
	LC_NUMERIC = "ru_RU.KOI8-R",
	LC_COLLATE = "ru_RU.KOI8-R",
	LC_CTYPE = "ru_RU.KOI8-R",
	LC_TIME = "ru_RU.KOI8-R",
	LANG = "de"
    are supported and installed on your system.
perl: warning: Falling back to the standard locale ("C").
Hello!

Как понимать эти сообщения? Что нужно сделать, чтобы получить
сообщения на немецком (файл с переводом есть и лежит в
locale/de/LC_MESSAGES/qqq.mo)? Где почитать про работу локали,
использование gettext и т.п.?


--
Юрий А. Зотов