Provided by: libtext-micromason-perl_2.13-2_all
NAME
Text::MicroMason::Embperl - Alternate Syntax like Embperl Templates
SYNOPSIS
Instead of using this class directly, pass its name to be mixed in: use Text::MicroMason; my $mason = Text::MicroMason::Base->new( -Embperl ); Use the standard compile and execute methods to parse and evalute templates: print $mason->compile( text=>$template )->( @%args ); print $mason->execute( text=>$template, @args ); Embperl syntax provides several ways to mix Perl into a text template: [- my $name = $ARGS{name}; -] [$ if $name eq 'Dave' $] I'm sorry [+ $name +], I'm afraid I can't do that right now. [$ else $] [- my $hour = (localtime)[2]; my $daypart = ( $hour > 11 ) ? 'afternoon' : 'morning'; -] Good [+ $daypart +], [+ $name +]! [$ endif $]
DESCRIPTION
This subclass replaces MicroMason's normal lexer with one that supports a syntax similar to Embperl. Compatibility with Embperl Embperl is a full-featured application server toolkit with many fatures, of which only the templating functionality is emulated. This is not a drop-in replacement for Embperl, as the implementation is quite different, but it should be able to process some existing templates without major changes. The following features of EmbPerl syntax are supported: • Square-bracket markup tags The following syntax features of are not supported: • Dynamic HTML tags Template Syntax The following elements are recognized by the Embperl lexer: • [- perl statements -] Arbitrary Perl code to be executed at this point in the template. • [+ perl expression +] A Perl expression to be evaluated and included in the output. • [! perl statements !] Arbitrary Perl code to be executed once when the template is compiled. • [$ name ... $] Supported command names are: if, elsif, else, endif, foreach, endforeach, while, endwhile, do, until, var. Private Methods lex_token ( $type, $value ) = $mason->lex_token(); Lexer for [. ... .] tags. Attempts to parse a token from the template text stored in the global $_ and returns a token type and value. Returns an empty list if unable to parse further due to an error. assembler_rules() Adds mappings from command names used in [$ ... $] tokens to the equivalent Perl syntax. %syntax_rules = $mason->assembler_rules();
SEE ALSO
For an overview of this templating framework, see Text::MicroMason. This is a mixin class intended for use with Text::MicroMason::Base. For distribution, installation, support, copyright and license information, see Text::MicroMason::Docs::ReadMe.