#!/usr/local/bin/perl
use DEPLOY::NATMCorp;
use DEPLOY::SecureNATMCorp;

require "date_time.pl";
require "HTMLTemplate.pl";
use CGI::Carp qw(fatalsToBrowser);

print "Content-type: text/html\n\n";

my $template = "http://$DEPLOY::NATMCorp::SITE_DOMAIN/main.html";
my $html;

$html{SECURE_DOMAIN} = $DEPLOY::SecureNATMCorp::SITE_DOMAIN;

$rh_html = \%html;

print &combineWithTemplate($template,$rh_html);