} elsif ($rs == 2){ # Aufruf der Seite mit Bestätigungslink und Reg-Check); 
       get "Id==!$uid range=0,1", $db1;
       $my_safecode = $n_safecode; # feldvar umspeichern
         if  ($nsc eq $my_safecode) {  # URL-Para nsc gleich gesp. my_safecode
         my $a_regenddatum = datum("jetzt", "Jahr-Monat-Tag,Stunde:Minute");
         mod "Id==!$uid", ["n_safecode", "1", "regabschluss", $a_regenddatum, "a_frei", "1", "a_art_admin", "1", "a_nutzer", "1"], $db1;
         $show = "reg_end";
       # - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -#
       my $mailtext_admin=<<EOF;
       BlaBla...
EOF
 # - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -#
       mail "$EMail_Webmaster","Registrierungsbestätigung eingegangen","$mailtext_admin","",
              "Admin Nutzerverwaltung","System Nutzerverwaltung","","","";
        # - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -#
       } elsif ($nsc ne $my_safecode) { # Fehler bei Überprüfung von nsc  
         $show = $my_safecode ne "1" ? "reg_end_fail" : "reg_done";
       } # E if/else Para nsc eq n_safecode
} else {