#!/usr/bin/perl

use CGI::Carp qw(fatalsToBrowser);
use strict;
use lib '/home/linkssql/public_html/cgi-bin/dev2/admin';
use Links qw/$CFG/;
use GT::Date;

local $SIG{__DIE__} = \&Links::fatal;

Links::init('/home/linkssql/public_html/cgi-bin/dev2/admin');
Links::init_user();


print "Content-type: text/html \n\n";
print "GT::Date: " . GT::Date::date_get() . "<BR>";
print "Localtime: " .localtime . "<BR>";
print "Time: " . time;