Q:
hi
Im new to cgi/perl .
something is wrong with the following code to create sessions.
it is working fine in console and creating session ids too.but not when we
try it on Konquerer.
#!/usr/bin/perl
use CGI;
use Apache::Session::File;
my $query = new CGI;
my %session;
my $id = undef;
$id = $query->cookie(-name=>"sess");
tie %session, 'Apache::Session::File', $id,
{ Directory => "/tmp/",
LockDirectory => "/tmp/"};
if ($id == undef) {
$cookie = $query->cookie( -name=>'sess',
-value=>$session{_session_id},
-expires=>'+1y',
-path=>'/session');
print $query->header(-cookie=>$cookie);
print "Assigned session ID<br>";
} else {
print $query->header();
print "Not assigned session ID<br>";
}
$id = $session{_session_id};
print "<html>";
print " Your session ID is $id";
print "</html>";
2)when we try to create simple session ids (using random numbers)and store
it in cookies
using
print "Set-Cookie:........ etc
it works in konquerer too .
can u find what is wrong with the code?
A:
Sorry but I can not teel you what the issue is. I do not know what
knoquerer is, I have never heard off.
Regarding the CGI.pm module usage it seems to be ok.
Regards,
Peter
[ back to toc ]