#!/usr/bin/perl -w

use strict;
use CGI;
use Digest::MD5;

my $q = CGI->new;                       # create new CGI object
my %params = $q->Vars;                  # get params as a hash


# create needed parameters for forms and scripts

require 'template.pl';

print "Content-type: text/html; charset=utf-8\n\n";
print template('enquiryfrm.tpl', \%params);

1;