/ 
Text-MicroMason-SafeServerPages-0.03
River stage zero No dependents
/ Text::MicroMason::SafeServerPages

NAME

Text::MicroMason::SafeServerPages - Safety ServerPages syntax

SYNOPSIS

use Text::MicroMason;
use Text::MicroMason::SafeServerPages;

my $m = Text::MicroMason->new(qw/ -SafeServerPages /);

my $template = <<'EOF';
<% my $s = \%ARGS; %>
<html>
<title><%= $s->{title} %></title>

<%raw= $s->{body} %>
</html>
EOF

my $cr = $m->compile( text => $template );

print $cr->(
  title => "Foo<bar>",
  body  => qq{<div class="section">aaaa</div>},
);

DESCRIPTION

Text::MicroMason::SafeServerPages is same as Text::MicroMason::ServerPages but HTML-escaped by default.

Template Syntax

Same as Text::MicroMason::ServerPages but =.

  • <%= perl expression %>

    Include evaluated value with HTML-escape.

  • <%raw= perl expression %>

    Include evaluated value without HTML-escape.

AUTHOR

cho45 <cho45@lowreal.net>

SEE ALSO

Text::MicroMason, Text::MicroMason::ServerPages

LICENSE

Original is Text::MicroMason::ServerPages.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.