Hello, @~ $_ ~@!
&~ } ~& Template syntax Any template become perl function after parsing. This function will accept it parameters in %_ (it start with local %_ = @_; ). Of course, you can use my() and local() variables in template (their scope will be full template, not only placeholder's block where they was defined). &~ PERL CODE ~& Execute PERL CODE but don't output anything. @~ PERL CODE ~@ Execute PERL CODE and output it result (last calculated expression) escaped using HTML::Entities::encode_entities(). ^~ PERL CODE ~^ Execute PERL CODE and output it result (last calculated expression) escaped using URI::Escape::uri_escape_utf8(). #~ PERL CODE ~# Execute PERL CODE and output it result (last calculated expression) AS IS, without any escaping. any other text ... ... will be output AS IS Example templates: To: #~ $_{email} ~# Hello, #~ $username ~#. Here is items your asked for: &~ for (@{ $_{items} }) { ~& #~ $_ ~# &~ } ~& ---cut header.html---Hello, @~ $_{username} ~@.
&~ # In HTML you may prefer News about @~ $_ ~@ #~ render('footer.html') ~# ---cut footer.html--- EXPORTS Nothing by default, but all documented functions can be explicitly imported. INTERFACE render( $filename, %params ) Render template from $filename with %params. This is caching wrapper around tmpl2code(), which avoid calling tmpl2code() second time for same $filename. Example: $html = render( 'template/index.html', title => $title, name => $name, ); Return STRING with rendered template. tmpl2code( $filename ) Read template from $filename (may be absolute or relative to current template's directory or current working directory - see "DESCRIPTION"), compile it into ANON function. This function can be executed with ( %params ) parameters, it will render $filename template with given %params and return SCALARREF to rendered text. Example: $code = tmpl2code( 'template/index.html' ); $html = ${ $code->( title=>$title, name=>$name ) }; Return CODEREF to that function. raw( $is_raw ) If $is_raw TRUE disable Unicode support. To enable Unicode again call raw() with $is_raw FALSE. Disabling Unicode support will speedup this module in about 1.5 times! When Unicode support disabled your parameters used to render template will be used in template AS IS, without attempt to encode them to UTF8. This mean you shouldn't use perl Unicode scalars in these parameters anymore. This affect only templates processed by tmpl2code() after calling raw() (beware caching effect of render()). encode_js( $scalar ) Encode $scalar (string or number) for inserting into JavaScript code (usually inside HTML templates). Example: Return encoded string. encode_js_data( $complex ) Encode $complex data structure (HASHREF, ARRAYREF, etc. - any data type supported by JSON::XS) for inserting into JavaScript code (usually inside HTML templates). Example: Return encoded string. SPEED AND SIZE This module implemented under 100 lines (about 3KB) of pure Perl code. And while code is terse enough, I believe it still simple and clean. While this is pure-perl module with many enough features, it's still very fast - you can do your own benchmarking using cool Template::Benchmark module, here is results from my system: instance_reuse This test simulate standard FastCGI which read template from HDD and compile it only once (when this template requested first time), and for next requests it just render it using cached anon subroutine. Rate XS? TT 29/s - Template::Toolkit (2.22) TT_X 95/s Y Template::Toolkit (2.22) with Stash::XS HM 704/s - HTML::Mason (1.45) TeCS 738/s Y Text::ClearSilver (0.10.5.4) TeMT 1131/s - Text::MicroTemplate (0.18) TeMMHM 1173/s - Text::MicroMason (2.12) using Text::MicroMason::HTMLMason * TMTU 1357/s - Text::MiniTmpl (1.1.0) with enabled Unicode MoTe 1629/s - Mojo::Template () * TMT 2054/s - Text::MiniTmpl (1.1.0) TeClev 5966/s Y Text::Clevery (0.0004) in XS mode TeXs 6761/s Y Text::Xslate (0.2015) uncached_disk This test simulate standard CGI which read template from HDD, compile and render it on each run - no caches used at all (except HDD files caching by OS). Rate XS? TeXs 1.4/s Y Text::Xslate (0.2015) TeClev 1.5/s Y Text::Clevery (0.0004) in XS mode HM 12.6/s - HTML::Mason (1.45) MoTe 21.0/s - Mojo::Template () TeMT 32.1/s - Text::MicroTemplate (0.18) TeMMHM 36.2/s - Text::MicroMason (2.12) using Text::MicroMason::HTMLMason * TMTU 54.1/s - Text::MiniTmpl (1.1.0) with enabled Unicode * TMT 67.9/s - Text::MiniTmpl (1.1.0) TeTmpl 448/s Y Text::Tmpl (0.33) TeCS 725/s Y Text::ClearSilver (0.10.5.4) HTP 1422/s Y HTML::Template::Pro (0.9504) SUPPORT Bugs / Feature Requests Please report any bugs or feature requests through the issue tracker at https://github.com/powerman/perl-Text-MiniTmpl/issues. You will be notified automatically of any progress on your issue. Source Code This is open source software. The code repository is available for public review and contribution under the terms of the license. Feel free to fork the repository and submit pull requests. https://github.com/powerman/perl-Text-MiniTmpl git clone https://github.com/powerman/perl-Text-MiniTmpl.git Resources * MetaCPAN Search https://metacpan.org/search?q=Text-MiniTmpl * CPAN Ratings http://cpanratings.perl.org/dist/Text-MiniTmpl * AnnoCPAN: Annotated CPAN documentation http://annocpan.org/dist/Text-MiniTmpl * CPAN Testers Matrix http://matrix.cpantesters.org/?dist=Text-MiniTmpl * CPANTS: A CPAN Testing Service (Kwalitee) http://cpants.cpanauthors.org/dist/Text-MiniTmpl AUTHOR Alex Efros