KentMedlem sedan juli 2000359 inlägg
Hittade denna kodsnutt hos jojoxx:
use CGI::Cookie;
$minkaka = new CGI::Cookie(-name => 'namn', -value => '$FORM{'namn'}', -expires => '+3M');
print "Set-Cookie: $minkaka\n";
men den lagrar inte kakan, varför?
Och hur hämtar jag värdet från kakan sen?
HansenMedlem sedan aug. 2000383 inlägg
Hej,
Du ska nog inte ha snuttar kring '$FORM{'namn'}', tar du bort dom och skriver ut rätt content huvud så ska det nog fungera. Testa denna snutt:
#!/usr/bin/perl -w
use strict;
use CGI::Cookie;
my %FORM = (
'namn' => 'Kent',
'epost' => 'snart@hotmail.com',
);
my $cookie = CGI::Cookie->new(
-name => 'namn',
-value => $FORM{'namn'},
-expires => '+3M'
);
print "Set-Cookie: $cookie\n";
print "Content-Type: text/html\n\n";
Använd CGI.pm istället för någon hemma kokad cgi parser.
Om du läser perldoc CGI::Cookie så står där alla svar som du behöver. http://www.perldoc.com/perl5.6.1/lib/CGI/Cookie.html
------------------
Hansen
c.h@ngmedia.com