gettext wrapped as Perl package