Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
$template->process("tpl.txt", {foo => $foo, s => \@s}) || die $templat
+e->error();

sub foo { $_[0]+$_[1] }
  2. or download this
    This is some line.
This is a line with some expression: [% foo %]
...
This is [% l %] line
[% END %]
This is the end