my $var = 'test';
	my $session = new CGI::Session("driver:File", undef, {Directory=>"/tmp"});
	$session->param("display_name", $display_name);
	$session->param("access_level", $access_level);
	$session->param("site_name", $site_name);
	$session->param("user_id", $user_id);
	$session->param("signature", $signature);
	$session->param('+18h');
	my $cookie = $foo->cookie($var => $session->id);
	print $foo->header( -cookie=>$cookie );

##</code><code>##

my $sid = $foo->param('test');
my $session = new CGI::Session(undef, $sid, {Directory=>'/tmp'});
my $access_level = $session->param("access_level") || 0;
my $display_name = $session->param("display_name") || "";
my $user_id = $session->param("user_id") || 0;

print "Sid: $sid<BR>
Session: $session<BR>
Access: $access_level<BR>
Name: $display_name<BR>
User ID: $user_id<BR>\n";

##</code><code>##

Sid: bab864bfd5e46898b2252e19cffdf038
Session: CGI::Session::File=HASH(0x1bc0680)
Access: 0
Name:
User ID: 0