my $session = new CGI::Session(undef, $query,{Directory=>"/tmp/data"});

$cookie = $query->cookie(CGISESSID => $session->id );
print $query->header(-cookie=>$cookie);

print $query->start_html( "Blah Blah" );

$session->delete( );
$session->flush();