Text::Template::Preprocess - Expand template text with embedded Perl
version 1.47
use Text::Template::Preprocess; my $t = Text::Template::Preprocess->new(...); # identical to Text::Template # Fill in template, but preprocess each code fragment with pp(). my $result = $t->fill_in(..., PREPROCESSOR => \&pp); my $old_pp = $t->preprocessor(\&new_pp);
Text::Template::Preprocess provides a new PREPROCESSOR option to fill_in. If the PREPROCESSOR option is supplied, it must be a reference to a preprocessor subroutine. When filling out a template, Text::Template::Preprocessor will use this subroutine to preprocess the program fragment prior to evaluating the code.
Text::Template::Preprocess
PREPROCESSOR
fill_in
Text::Template::Preprocessor
The preprocessor subroutine will be called repeatedly, once for each program fragment. The program fragment will be in $_. The subroutine should modify the contents of $_ and return. Text::Template::Preprocess will then execute contents of $_ and insert the result into the appropriate part of the template.
$_
Text::Template::Preprocess objects also support a utility method, preprocessor(), which sets a new preprocessor for the object. This preprocessor is used for all subsequent calls to fill_in except where overridden by an explicit PREPROCESSOR option. preprocessor() returns the previous default preprocessor function, or undefined if there wasn't one. When invoked with no arguments, preprocessor() returns the object's current default preprocessor function without changing it.
preprocessor()
In all other respects, Text::Template::Preprocess is identical to Text::Template.
Text::Template
One possible purpose: If your files contain a lot of JavaScript, like this:
Plain text here... { perl code } <script language=JavaScript> if (br== "n3") { // etc. } </script> { more perl code } More plain text...
You don't want Text::Template to confuse the curly braces in the JavaScript program with executable Perl code. One strategy:
sub quote_scripts { s(<script(.*?)</script>)(q{$1})gsi; }
Then use PREPROCESSOR => \"e_scripts. This will transform
PREPROCESSOR => \"e_scripts
The development version is on github at http://github.com/mschout/perl-text-template and may be cloned from git://github.com/mschout/perl-text-template.git
Please report any bugs or feature requests to bug-text-template@rt.cpan.org or through the web interface at: http://rt.cpan.org/Public/Dist/Display.html?Name=Text-Template
Mark Jason Dominus, Plover Systems
Please send questions and other remarks about this software to mjd-perl-template+@plover.com
mjd-perl-template+@plover.com
You can join a very low-volume (<10 messages per year) mailing list for announcements about this package. Send an empty note to mjd-perl-template-request@plover.com to join.
mjd-perl-template-request@plover.com
For updates, visit http://www.plover.com/~mjd/perl/Template/.
http://www.plover.com/~mjd/perl/Template/
This software is copyright (c) 2013 by Mark Jason Dominus <mjd@cpan.org>.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
To install Text::Template, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Text::Template
CPAN shell
perl -MCPAN -e shell install Text::Template
For more information on module installation, please visit the detailed CPAN module installation guide.