PGetText - pure perl i18n routines

 


  use Locale::PGetText;

  Locale::PGetText::setLocaleDir('/usr/local/perl/locale');
  Locale::PGetText::setLanguage('ru-koi8r');

  print gettext("Welcome!"), "\n";

PGetText provides the same functionality as GNU gettext does, but it is written in pure perl and doesn't require any system locale stuff.

setLocaleDir() sets directory where messages database is stored (there are no default and no domains).

setLanguage() switches languages.

gettext() retrieves message in local language corresponding to given message.

MsgFormat(1)

Mike Shoyher <msh@corbina.net>, <msh@apache.lexa.ru>