.\" Automatically generated by Pod::Man 4.14 (Pod::Simple 3.43) .\" .\" Standard preamble: .\" ======================================================================== .de Sp \" Vertical space (when we can't use .PP) .if t .sp .5v .if n .sp .. .de Vb \" Begin verbatim text .ft CW .nf .ne \\$1 .. .de Ve \" End verbatim text .ft R .fi .. .\" Set up some character translations and predefined strings. \*(-- will .\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left .\" double quote, and \*(R" will give a right double quote. \*(C+ will .\" give a nicer C++. Capital omega is used to do unbreakable dashes and .\" therefore won't be available. \*(C` and \*(C' expand to `' in nroff, .\" nothing in troff, for use with C<>. .tr \(*W- .ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p' .ie n \{\ . ds -- \(*W- . ds PI pi . if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch . if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\" diablo 12 pitch . ds L" "" . ds R" "" . ds C` "" . ds C' "" 'br\} .el\{\ . ds -- \|\(em\| . ds PI \(*p . ds L" `` . ds R" '' . ds C` . ds C' 'br\} .\" .\" Escape single quotes in literal strings from groff's Unicode transform. .ie \n(.g .ds Aq \(aq .el .ds Aq ' .\" .\" If the F register is >0, we'll generate index entries on stderr for .\" titles (.TH), headers (.SH), subsections (.SS), items (.Ip), and index .\" entries marked with X<> in POD. Of course, you'll have to process the .\" output yourself in some meaningful fashion. .\" .\" Avoid warning from groff about undefined register 'F'. .de IX .. .nr rF 0 .if \n(.g .if rF .nr rF 1 .if (\n(rF:(\n(.g==0)) \{\ . if \nF \{\ . de IX . tm Index:\\$1\t\\n%\t"\\$2" .. . if !\nF==2 \{\ . nr % 0 . nr F 2 . \} . \} .\} .rr rF .\" ======================================================================== .\" .IX Title "Text::MicroMason::ServerPages 3pm" .TH Text::MicroMason::ServerPages 3pm "2023-08-10" "perl v5.36.0" "User Contributed Perl Documentation" .\" For nroff, turn off justification. Always turn off hyphenation; it makes .\" way too many mistakes in technical documents. .if n .ad l .nh .SH "NAME" Text::MicroMason::ServerPages \- Alternate Syntax like ASP/JSP Templates .SH "SYNOPSIS" .IX Header "SYNOPSIS" Instead of using this class directly, pass its name to be mixed in: .PP .Vb 2 \& use Text::MicroMason; \& my $mason = Text::MicroMason::Base\->new( \-ServerPages ); .Ve .PP Use the standard compile and execute methods to parse and evaluate templates: .PP .Vb 2 \& print $mason\->compile( text=>$template )\->( @%args ); \& print $mason\->execute( text=>$template, @args ); .Ve .PP Server Pages syntax provides another way to mix Perl into a text template: .PP .Vb 9 \& <% my $name = $ARGS{name}; \& if ( $name eq \*(AqDave\*(Aq ) { %> \& I\*(Aqm sorry <%= $name %>, I\*(Aqm afraid I can\*(Aqt do that right now. \& <% } else { \& my $hour = (localtime)[2]; \& my $daypart = ( $hour > 11 ) ? \*(Aqafternoon\*(Aq : \*(Aqmorning\*(Aq; \& %> \& Good <%= $daypart %>, <%= $name %>! \& <% } %> .Ve .SH "DESCRIPTION" .IX Header "DESCRIPTION" This subclass replaces MicroMason's normal lexer with one that supports a syntax similar to Active Server Pages and Java Server Pages. .SS "Compatibility with Apache::ASP" .IX Subsection "Compatibility with Apache::ASP" Apache::ASP is a full-featured application server toolkit with many fatures, of which only the templating functionality is emulated. .PP This is not a drop-in replacement for Apache::ASP, as the implementation is quite different, but it should be able to process some existing templates without major changes. .PP The following features of EmbPerl syntax are supported: .IP "\(bu" 4 Angle-bracket markup tags .PP The following syntax features of are \fBnot\fR supported: .IP "\(bu" 4 Dynamic \s-1XML/XSL\s0 processing. .IP "\(bu" 4 Web server objects such as \f(CW$Session\fR, \f(CW$Request\fR, \f(CW$Response\fR, and \f(CW$Application\fR. .IP "\(bu" 4 Application events such as Application_OnStart, Script_OnStart, and other gloga.asa features. .SS "Template Syntax" .IX Subsection "Template Syntax" The following elements are recognized by the ServerPages lexer: .IP "\(bu" 4 <% perl statements %> .Sp Arbitrary Perl code to be executed at this point in the template. .IP "\(bu" 4 <%= perl expression %> .Sp A Perl expression to be evaluated and included in the output. .IP "\(bu" 4 <%& file, arguments %> .Sp Includes an external template file. .IP "\(bu" 4 <%\-\- comment \-\-%> .Sp Documentation or inactive code to be skipped over silently. Can also be used to quickly comment out part of a template. .IP "\(bu" 4 <%\fIname\fR> ... .Sp Supported block names are: 'perl', 'args', 'once', 'init', 'cleanup', and 'doc'. .SS "Private Methods" .IX Subsection "Private Methods" .IP "lex_token" 4 .IX Item "lex_token" .Vb 1 \& ( $type, $value ) = $mason\->lex_token(); .Ve .Sp Lexer for <% ... %> tags. .Sp Attempts to parse a token from the template text stored in the global \f(CW$_\fR and returns a token type and value. Returns an empty list if unable to parse further due to an error. .SH "SEE ALSO" .IX Header "SEE ALSO" For an overview of this templating framework, see Text::MicroMason. .PP This is a mixin class intended for use with Text::MicroMason::Base. .PP For distribution, installation, support, copyright and license information, see Text::MicroMason::Docs::ReadMe.