use CGI;
use CGI::Session;
use File::Spec;

my $cgi = CGI->new;
my $session = CGI::Session->new( undef, $cgi, { Directory => File::Spec->tmpdir } )
    or die "Cannot create \$session!\n";