nicht angemeldet
Hi.
Bin wieder zurueck vom Urlaub und sehe das mein letzter beitrag schon archiviert wurde und das im september??? naja egal....
Ich hoffe vielmals das ihr mir noch eine chanche gebt und mir nochmal helft.
ich habe den letzten Thread mal rausgesucht (ich hoffe ich darf ihn hier reinschreiben??) http://forum.de.selfhtml.org/archiv/2008/9/t177472/
Wer nicht reinschauen moechte: es ging um einen loginbereich. Erst wenn die richtigen Daten eingegeben werden soll ein cookie verschickt werden und trotz euerer wirklich zahlreichen antworten bin ich noch nicht weiter oder schlauer ;=(
ich dachte mir ich poste jetzt einfach mal meinen code damit ihr genauer wisst wo ich gerade bin und ich denke so koennte man mir besser helfen. Ich habe uebrigends die unwichtigeren sachen rausgeloescht weil es sonst zu viel wird also zum beispiel die pruefung ob der user in der datenbank ist und ob das passwort stimmt usw hier also der code:
#!/usr/bin/perl
use strict;
use CGI;
my $login = new CGI;
my $username = $login->param("username");
my $passwort = $login->param("passwort");
print "Content-Type: text/html\n\n";
print "<html><head></head><body>"
print "Bitte loggen Sie sich ein:";
print "<form action="login.pl">";
print "<input type="text" name="username">";
print "<input type=""text"\ name="passwort">";
print "<input type="submit">";
print "</form>";
if ($username && $passwort) {
#hier dann die pruefungen
#wenn sie korrekt sind dann soll zur sub cookie springen
cookie;
}
sub cookie {
my $cookie = $login->cookie(
{"name" => "cookiename", "value" => "cookievalue" } );
print $login->header (
{"cookie" => $cookie} );
}
Ich weiss das man den Cookie vor dem "Content-Type: text/html" schreiben muss aber dann kann ich ja kein loginformular ausgeben. Ich verzweifle :=((
bitte bitte helft mir noch einmal!!
gruezi Frey und einen schoenen tag euch allen!!
Struppi