use strict;
use HTML::Template;
use CGI;

my $login = "login <input type=\"text\" name=\"user\"> password <input type=\"text\" name=\"pass\">  <input type=\"submit\" value=\"Submit\" name=\"submit\">";
my $template = HTML::Template->new(filename => "template");

$template->param(LOGIN => $login); ## Put an IF here after finding out if they have a cookie / ticket :) ##
$template->param(NAV => "blah blah");
$template->param(CONTENT => "woof woof");

my $cgi = new CGI;

my $user = $cgi->param('user');
my $pass = $cgi->param('pass');

if ($user) {
  $cgi->start_html;
  print "Content-Type: text/html\n\n";
  print "well HELLO";
  $cgi->end_html;
}
else {
  $cgi->start_html;
  print "Content-Type: text/html\n\n", $template->output;
  $cgi->end_html;
}