if ($cmd eq "addpw") # reagiert nur wenn ein passwort gespeichert wird
{
put undef,"nutzer";
out "Passwort wurde hinzugefügt... <br>Hier geht's zum <a href=http://baseportal.de/cgi-bin/baseportal.pl?htx=/verwitwet/test/register>Login</a>.";
out <<EOF;
<form name=Ausgabe action="http://www.nettz.de/Formular-Chef/Formular-Chef.cgi" method="post">
EOF
out '<input type="hidden" name="empfaenger" value="$empfaenger">';
out '<input type="hidden" name="betreff" value="Registrierung !">';
out '<input type="hidden" name="absender" value="$EMail">';
out '<input type="hidden" name="antwortseite_template" value="http://www.verwitwet.de/form/registrierantwort.htm">';
out '<input type="hidden" name="email_template" value="http://www.verwitwet.de/form/registrieremail.txt">';
out '<input type="hidden" name="kopie_an_absender_template" value="http://www.verwitwet.de/form/registrierbestaetigung.txt">';
out '<input type="hidden" name="nutzer_name:=" value="$_put{Nickname}">';
out <<EOF;
</form>
<script language="JavaScript">
document.Ausgabe.submit();
</script>
EOF
}
</perl>