#! /usr/bin/perl
use strict;
use warnings FATAL => 'all';
use CGI;
use Template;
my $tt = Template->new( {
PLUGIN_BASE => 'Local',
} );
print CGI->new->header;
$tt->process( \*DATA, { msg => 'Seems to work' } )
or die $!;
exit;
__DATA__
[% USE MyPlugin %]
[% msg %]
[% msg | make_red %]