#!/usr/bin/perl
print "Content-type: text/html\n\n";
require("cgi-lib.pl");

&ReadParse(*input);

$name=$input{'name'};
$vorname=$input{'vorname'};
$email=$input{'email'};
$uni=$input{'uni'};
if ($input{'freitag'} eq "true"){$freitag="checked"};
if ($input{'samstag'} eq "true"){$samstag="checked"};
if ($input{'leipzig'} eq "true"){$leipzig="checked"}; 
if ($input{'halle'} eq "true"){$halle="checked"}; 
if ($input{'jena'} eq "true"){$jena="checked"};  

print<<"print_tag"
<html> <head>
<title>Mitteldeutsche Physik-Combo</title>
</head>


<FORM Method=POST Action="check.cgi">

<table border = 0 width = 80%>

<caption align=left >
<h1>

Anmeldung Mitteldeutschen Physik-Combo</h1></caption>
<th align=left> Vorname
<th align=left> Name<tr>
<td> <input type=text size=30 maxlength=40 name="vorname" value=$vorname>
<td> <input type=text size=30 maxlength=40 name="name" value=$name><tr>
<th align=left> Universit&auml;t<th align=left>E-Mail-Adresse (bei Erstanmeldung UNBEDINGT angeben!)<tr>
<td> <input type=text size=30 maxlength=40 name="uni" value=$uni>
<td> <input type=text size=30 maxlength=40 name="email" value=$email><tr>
<th colspan=2 align = left> Ich ben&ouml;tige eine &Uuml;bernachtung f&uuml;r:
<tr>
<th colspan=2 align = left>
<input type="checkbox" name="freitag" value="true" $freitag>Freitag
<input type="checkbox" name="samstag" value="true" $samstag>Samstag <tr>
<th colspan=2 align = left> Tagungsort: (Bitte f&uuml;r jede Tagung getrennt anmelden!) <tr>
<th colspan=2 align = left> 
<input type="checkbox" name="leipzig" value="true" $leipzig>Leipzig 
<input type="checkbox" name="halle" value="true" $halle>Halle 
<input type="checkbox" name="jena" value="true" $jena>Jena
<tr>
<td> <input type="submit" name="simple" value="Anmeldung abschicken">
<td> <input type="reset" value="Alles loeschen">
</table>
</form>
</body> </html>
print_tag
