use CGI;
use CGI::Carp qw{ fatalsToBrowser };
use CGI::Cookie;
use strict;
use HTML::Template;

my $cgi = new CGI();
my $template;
my $validated;

# Validation of login removed

if ($validated) {
  my $cookie = new CGI::Cookie(-name    =>  'star',
                               -value   =>  $cgi->param('username'),
                               -expires =>  $cgi->param('auto_login')?'+365d':'+3h');
  print $cgi->header(-cookie=>$cookie);
  $template = HTML::Template->new(filename => 'login-success.tmpl',
                                  die_on_bad_params => 0);
  $template->param('successURL'=> $successurl);
} else {
  my $cookie = new CGI::Cookie(-name    =>  'star',
                               -value   =>  undef,
                               -expires =>  '+1s');
  print $cgi->header(-cookie=>$cookie);
  $template = HTML::Template->new(filename => '../index.html',
                                  die_on_bad_params => 0);
}
print $template->output();