Pure perl implementation of GNU gettext