(PERL) Checkbox(en) mit Bild in Script einfügen

[Goi]

Hallo,

ich versuche mich gerade an einem Script, dass ich etwas verändern
möchte und habe nun folgendes Problem.

Das Ganze ist eine Datenbank...
Die Benutzer sollen sich über ein Formular anmelden.
In dieses Formular will ich ein paar Checkboxen einbauen.

Wenn man dann eine oder mehrere Checkboxen auswählt soll dazu eine
(oder mehrere - je nachdem wie viel Boxen man angeklickt hat) Grafik
in der fertigen Seite angezeigt werden.

Ich füge mal hier den Code des des Formularcodes ein an dem ich die Checkboxen einbauen möchte.
Ich habe mal 2 Checkboxen eingefügt: wow, lr

<td bgcolor="#013161"><font color="#FFFFFF">
<select name="Mitglieder" size="1">
<option selected value="klimit">kein Limit</option>
<option value="50">ca. 50</option>
<option value="100">ca. 100</option>
<option value="250">ca. 250</option>
<option value="500">ca. 500</option>
<option value="750">ca. 750</option>
<option value="1000">ca 1.000</option>
<option value="2000">ca. 2.000</option>
</select> </td>
</tr>
<tr>
<td valign="top" bgcolor="#013161">
<font size="-1" face="Arial,Helvetica" color="#FFFFFF"><b>
Welche Spiele unterstützt die Gilde:</b></font></td>
<td bgcolor="#013161">
<input type="checkbox" name="Spiele" value="wow"><font size="1" face="Arial,Helvetica"><b>World
of Warcraft</b></font>
<input type="checkbox" name="Spiele" value="lr"><font size="1" face="Arial,Helvetica"><b>LastRebellion </b></font>

</td>


Ich denke hier müsste mal eine Stelle im Script sein,
wo man die Veränderung unterbringen muss.

$in{Aufnahmebedingungen} =~ s/\n/<BR>/g;

open (DATEI, "> $verz/$awardnr.dat");
print DATEI $in{Gildenname}."\n";
print DATEI $in{Passwort}."\n";
print DATEI $in{Gildenmeister}."\n";
print DATEI $in{eMail}."\n";
print DATEI $in{PageURL}."\n";
print DATEI

$in{GrafikURL1}."|".$in{GrafikURL2}."|".$in{GrafikURL3}."|".$in{GrafikURL4}."\n";
if ($in{Bewerbung}) { print DATEI $in{Mitglieder}." (Auf Empfehlung /

Bewerbung)\n";
} else {
print DATEI $in{Mitglieder}."\n";
}
print DATEI "$in{Gildenstory}\n";
if ($in{Besonderes}) {
print DATEI $in{Besonderes}."\n";
} else {
print DATEI "-\n";
}
print DATEI $in{Aufnahmebedingungen}."\n";
close DATEI;[/I]

Ich hoffe mir kann jemand helfen, auch wenn ich mich wohl sehr leihenhaft ausgedrückt habe.
Ich bin noch ein Anfänger in diesem Bereich, würde mich aber über jede Hilfe
bzw. Denkanstöße freuen.

Freundliche Grüße
Goi