my $session = CGI::Session->load("driver:File", $session_id, {Directory=>$datadir.'/members/sessions'}); if ($session) { $session->delete(); $session->flush(); }