#!/usr/bin/perl
use strict;
use CGI qw/:standard/;
use lib '/home/sdbadmin/PerlModule';
use CGI::Session;

my $cgi_obj   = new CGI();
my $session = new CGI::Session() or die CGI::Session->errstr;