my $session = CGI::Session->load() or die CGI::Session->errstr;
if ($session and not $session->is_empty and not $session->is_expired) { #Session ist gültig
  $SESSIONID = $session->id;       
}