Next: , Previous: Tcl, Up: List of Programming Languages

15.5.18 Perl

File extension
pl, PL, pm, perl, cgi
String syntax

gettext shorthand
__ (double underscore)
gettext/ngettext functions
gettext, dgettext, dcgettext, ngettext, dngettext, dcngettext
textdomain function
bindtextdomain function
bind_textdomain_codeset function
Use setlocale (LC_ALL, "");
use POSIX;
use Locale::TextDomain; (included in the package libintl-perl which is available on the Comprehensive Perl Archive Network CPAN,
Use or emulate GNU gettext
platform dependent: gettext_pp emulates, gettext_xs uses GNU gettext
xgettext -k__ -k\$__ -k%__ -k__x -k__n:1,2 -k__nx:1,2 -k__xn:1,2 -kN__ -k
Formatting with positions
Both kinds of format strings support formatting with positions.
printf "%2\$d %1\$d", ... (requires Perl 5.8.0 or newer)
__expand("[new] replaces [old]", old => $oldvalue, new => $newvalue)
The libintl-perl package is platform independent but is not part of the Perl core. The programmer is responsible for providing a dummy implementation of the required functions if the package is not installed on the target system.
po-mode marking

Included in libintl-perl, available on CPAN (

An example is available in the examples directory: hello-perl.

The xgettext parser backend for Perl differs significantly from the parser backends for other programming languages, just as Perl itself differs significantly from other programming languages. The Perl parser backend offers many more string marking facilities than the other backends but it also has some Perl specific limitations, the worst probably being its imperfectness.