#!/usr/bin/perl -w
use lib "/usr/local/scripts/lib/";
use lib "/usr/local/script/lib/";
use CGI;
use CGI::Session;
use HTTP::BrowserDetect;
use Time::localtime;
#use sk_mod;
my $brouser = new HTTP::BrowserDetect($ENV{\'HTTP_USER_AGENT\'});
my $cgi = new CGI;
print $cgi->header(-expires=>\'no cache\', -charset=>\'koi8-r\');
if ($brouser->browser_string() ne \'MSIE\') {
print \'\';
}
my $headpage="Skif home page";
print $cgi->start_html(-title=>$headpage, -bgcolor=>\'ffffff\',-leftmargin=>\'0\', -topmargin=>\'0\', -marginwidth=>\'0\', -marginheight=>\'0\',text=>\'lightgrey\');
print "";
";
print "";
#header_table(\' K L O \',\'eng\');
print "asdasda";
print "";
#midle_table();
print "asdasda2";
print ""; ";
#low_table();
print "asdasda3";
print "
print "
print $cgi->end_html;