xNeTworKx: Cookie setzen, aber danach weiterleiten ?

Beitrag lesen

Hallo,
Ich hab da folgendes Problem. Auf meiner hp habe ich eine kleine Wahl zu meiner Seite, Excellent. good, bad usw. Ich schreibe hierzu jeweils a, b, c, d usw auf ein Flat File und setze ein Cookie, sodaß man nicht doppelt voten kann. Nun soll das Script aber nach dem setzen des Cookies weiterleiten, was aber irgendwie nicht geht, da ich ja print $query->header(-cookie=>$cookie); habe und somit einen Header ausgebe, was mir wiederum Steine in den Weg wegen $query->redirect legt.
Wie kann man das auf irgendeine Weise umgehen ?
Ich hab die Weiterleitung bis jetzt mit JavaScript gemacht, aber das kann es doch nicht sein ?
Ich poste mal das (vielleicht etwas beschämende) Script.

#!/usr/bin/perl -w

use CGI;
$query = new CGI;

$data = "b";
$cookie = $query->cookie(-name=>'vote',
               -value=>'on',
               -expires=>'+1095d',
               -path=>'/');
print $query->header(-cookie=>$cookie);
print "<html><head><title>good</title></head>\n";
print "<body>\n";
open(STAT,">>vote.txt") or die "There is an error, please try again";
flock STAT, 2;
print STAT $data;
close STAT;
print "<script language="JavaScript">\n";
print "window.location.href="vote_umleitung.html"\n";
print "</script>\n</body>\n</html>\n";