if(defined($self->{'s'})){
  # $self->{'s'}->flush() or $self->log('WARNING','Failed attempt to flush session parameters for cgisess_' . $self->{'s'}->id()  . ' to the file store: ' . $!);
  # $self->{'s'}->flush() or die 'Failed attempt to flush session parameters for cgisess_' . $self->{'s'}->id()  . ' to the file store: ' . $!;
  $self->{'s'}->flush() or print STDERR 'Failed attempt to flush session parameters for cgisess_' . $self->{'s'}->id()  . ' to the file store: ' . CGI::Ses
sion->errstr();
  # $self->{'s'}->flush() or print STDERR 'Failed attempt to flush session parameters for cgisess_' . $self->{'s'}->id()  . ' to the file store: ' . $self->{'s'}->errstr();
}

$self->{'s'}->dump();
CGI::Session->dump();
$self->log('DEBUG','Our session in the end reads: ',$self->{'s'});