Have you looked at Locale::Maketext, or if you are on a Unix system the GNU gettext utility (which also has a Perl module I think)?

Of course, this doesn't help you translate the text... there I'm totally useless. :)