<perl db=/Modellflugvereine/Modellflugplatz>
 $_put{IP}=$_REMOTE_ADDR;
</perl>
<p><do action=input db=/Modellflugvereine/Modellflugplatz></p>
<p>Vielen Dank für Ihren Eintrag</p>
<A HREF="http://www.modellflugvereine.de/463.0.html?&no_cache=1">Zurück zur Vereinsliste</a>

<perl db=/Modellflugvereine/Mail>
get "Id==*", "/Webcam/Mail","holen";
while (get_next("holen"))
{
mail "$Mailadresse",
    "Neuer Verein eingetragen bei www.modellflugvereine.de",
    "Sehr geehrte Damen und Herren,<p>Sie haben sich in die Mailingliste bei www.modellflugvereine.de eingetragen.<p>Folgender neuer Verein wurde gemeldet:<p>
Name: $Vereinsname<p>
Ort: $PLZ $Stadt, $Bundesland<p>
Link zur Datenbank: <a href=\"http://www.peter-heck.de/cgi-bin/baseportal.pl?htx=/Modellflugvereine/Details&Id==$Id\">$Vereinsname</a><p>
URL: <a href=\"http://$Homepage_des_Vereins\">$Homepage_des_Vereins</a><p>
Möchten Sie Ihre Angaben zur Mailliste ändern, so klicken Sie bitte hier:<a href=\"http://www.peter-heck.de/cgi-bin/baseportal.pl?htx=/Modellflugvereine/Mail_aendern&Mailadresse=$Mailadresse\">Ändern</a><p>
Möchten Sie Ihren Eintrag wieder aus der Mailingliste entfernen, so klicken Sie bitte hier: <a href=\"http://www.peter-heck.de/cgi-bin/baseportal.pl?htx=/Modellflugvereine/Mail_loechen&Mailadresse=$Mailadresse\">Löschen</a><p>
Viele Grüße<p>Peter Heck (Webmaster)",
    'webmaster@modellflugvereine.de',
    "$Name_mail",
    "Peter Heck",
    '',
    '',
    "Content-type: text/html\n";
}
</perl>

   Peter