my $ppi = Log::Report::Extract::PerlPPI->new ( lexicon => '/usr/share/locale' ); $ppi->process('lib/My/Pkg.pm'); # many times $ppi->showStats; $ppi->write; # See script xgettext-perl
See SYNOPSIS in Log::Report::Extract
This module helps maintaining the POT files, updating the list of
message-ids which are kept in them. After initiation, the process()
method needs to be called with all files which changed since last processing
and the existing PO files will get updated accordingly. If no translations
exist yet, one textdomain/xx.po
file will be created.
See DESCRIPTION in Log::Report::Extract