--------- filename = sample.pl --------------------------
#!{location of your perl interpreter}
use HTML::Template;
my $template = HTML::Template->new(filename => 'test.tmpl');
$template->param(
HOME => $ENV{HOME},
PATH => $ENV{PATH},
);
print "Content-Type: text/html\n\n";
print $template->output;
print "\n\nINC = @INC \n\n";
---------------------- filename: test.tmpl THIS IS YOUR TEMPLATE
FILE-----------------------------
<HTML>
<HEAD><TITLE>Test Template</TITLE>
<BODY>
My home directory is<TMPL_VAR NAME=HOME>
<P>
MY PATH is set to <TMPL_VAR NAME=PATH>
</BODY>
</HTML>
__________________
William Ampeh (x3939)
Federal Reserve Board
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
