und recht hat der renee, nächster versuch:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
#!/usr/local/bin/perl
use strict;
use CGI;
my $cgi = CGI->new();
my %uservars = $cgi->Vars();
$fehler = @anwort = (0,'B','D','B','A','C','D','D','B', 'B','D','B', 'C', 'A','D','C','C', 'A','C');
for (1..$#anwort) { $fehler-- if $uservars{"IQ$_"} eq $antwort[$_] }
print "Content-type: text/html\n\n";
print <<EOF;
<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>
<head>
<style type="text/css"><!--
body {font-size:18px; }
--></style>
</head>
<BODY background="../back.jpg" text="#000000" bgcolor="#FFFFCC" link="#FF0000" vlink="#FF0000" alink="#FF0000">
<center><b><font size=+4>Testauswertung</font><br>
<br>Diese Auswertung zeigt nur die falschen Angaben in den jeweiligen Abschnitten:
<p>Abschnitt 1) (logisches Denken figural)<br>
<font color="#FF0000">$logischFig</font> Fehler in 8 Aufgaben</p>
<p>Abschnitt 2) (logisches Denken verbal)
<br><font color="#FF0000">$logischVerb</font> Fehler in 8 Aufgaben
<p>Abschnitt 3) (räumliches Vorstellungsvermögen)
<br><font color="#FF0000">$raumlich</font> Fehler in 4 Aufgaben</p>
------------------------------------------------------------------------------------------
-----------
<br><br>Ergebnis:<br>
<font color="#FF0000">$falsch</font> Antwort(en) von $#anwort Aufgaben sind falsch .......
</center>
</body>
</html>
EOF
jetzt hast du schon auch automatisch aktielle anzahl der test drin, vielleicht noch netten titel?\n\n
<!--EDIT|lichtkind|1147984378-->