use CGI::Session;

my $session = new CGI::Session("driver:File", undef, {Directory=>'F:/web/sessions'}) or bail_out(CGI::Session->errstr);