The module Locale::TextDomain(3pm) provides a high-level interface to Perl message translation.