also das ist der perl-code:
#!/usr/bin/perl -w
use CGI;
use strict;
my $q = new CGI;
use CGI::Carp qw(fatalsToBrowser);
print "Content-Type: text/html\n\n";
my @felder = $q->param();
foreach (@felder) {
print $q->param($_);
}
html-quelltext:
<html>
<head>
</head>
<body>
<form action="http://www.domain.de/cgi-bin/test2.cgi" method="post">
<input type="radio" name="emailauswahl" value="1"> test@test.de - Fragen zu Produkten, Bestellung, usw<br>
<input type="radio" name="emailauswahl" value="2"> test@test.de - Fragen oder Probleme mit unserer Webseite<br>
<input type="radio" name="emailauswahl" value="1"> test@test.de - Fragen oder Informationen<br><br>
<textarea name="frage" cols="35" rows="7"></textarea><br><br>
<input type="text" name="email">
<input type="image" name="submit" value="test" src="gif/bilder/email.gif" alt="E-Mail abschicken">
</form>
</body>
</html>