#!C:/Perl/bin/perl.exe
use HTML::Template;

 my $cgi = new CGI;
 my $var = $cgi->param('param1');

my $template = HTML::Template->new(filename => '..\\htdocs\\dropui\\check.tmpl');

  # fill in some parameters in the template;

  $template->param(CHECK => $var);

  # send the obligatory Content-Type
  print "Content-Type: text/html\n\n";

  # print the template
  print $template->output;