my $ppi = Log::Report::Extract::PerlPPI->new ( lexicon => '/usr/share/locale' ); $ppi->process('lib/My/Pkg.pm'); # many times $ppi->showStats; # to dispatchers which accept TRACE or INFO $ppi->write; # also cleans processing memory.
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.