# Create new session
my $session = new CGI::Session("driver:File", $cgi, {Directory => 'ses'})  or die CGI::Session->errstr;;
my $sid = $session->id();