my $query = new CGI;

$query -> param("123 Main Street");
my $html = "../form.html";

my $template = HTML::Template->new(filename => '../form.tmpl');

my $fif = new HTML::FillInForm;
my $output = $fif->fill(scalarref => \$html,
                             fobject => $query);
                       
print "Content-type: text/html\n\n";
print $template->output();     

##</code><code>##

<form action="cgi-bin/fill.pl" method="post">
   <input type="text" name="address" size="30" />
   <input type="submit" />
</form>