my $sid = cookie('main') || undef; my @sessionInfo; my $session = new CGI::Session(undef, $sid, {Directory=>'c:/apache/sessions'}); if ( $session->is_new() ) { $session->delete(); }