# Check cookie and initialise a guest session if need be
$sid = $q->cookie("CGISESSID") || undef;
$session = new CGI::Session("driver:File",$sid,{'Directory'=>"./tmp/sessions"});
print $session->header();