#!/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"}; if ($input{'stip'} eq "true"){$stip="checked"}; print<<"print_tag"