use CGI::sesssion::File; use CGI; my $cgi = new CGI; my $sid = $cgi->cookie(SESSION_COOKIE) || $cgi->param("sid") || undef; //creating a new session my $session = new CGI::Session::File(undef {LockDirectory=>"/tmp", Directory=>"/tmp"}) or die $CGI::Session::errstr; print "Your session id is ", $session->id(); // A cookie is being created which is then being send to the user browser $cookie = $cgi->cookie(CGISESSID => $session->id ); print $cgi->header(-cookie=>$cookie); $session->save_param($cgi, ["login_name", "password"]);