I am using cgi.pm to set a cookie in this fashion.
%info=(memdir=>"$usrdat{'userdir'}",
status=>"$usrdat{'status'}",
location=>"$User",
User=>"$usrdat{'user'}",
memurl=>"$usrdat{'memurl'}",
admincomment=>"$usrdat{'admincomment'}",
pack=>"$usrdat{'pack'}" ,
nic=>"$usrdat{'nic'}" );
$cookie = $query->cookie(-name=>'somecookie',
-value=>\%info,
-path=>'/',
);
#print $query->header();<----line 154
print $query->header(-cookie=>$cookie);
I have no problem with this part. The cookie seems to be in the correct format when I uncomment line 154. I am reading the cookie in this fashion.
use CGI;
$database = new CGI;
%info = $database->cookie('somecookie');
#print $database->header();
# while (($key, $value) = each %info){
#print "$key => \"$value\"<BR> , \n";}
#print "PERL VERSION: $]<BR>" ;
I have no problem getting the cookie on a NT server running IIS but on a *nix server running Apache I am not retreiving the cookie? I am not sure why this seems to be such a simple procedure but it still does not work on *nix.
HELP PLZ, (frustrated)
Thanks in advance....Haunter
%info=(memdir=>"$usrdat{'userdir'}",
status=>"$usrdat{'status'}",
location=>"$User",
User=>"$usrdat{'user'}",
memurl=>"$usrdat{'memurl'}",
admincomment=>"$usrdat{'admincomment'}",
pack=>"$usrdat{'pack'}" ,
nic=>"$usrdat{'nic'}" );
$cookie = $query->cookie(-name=>'somecookie',
-value=>\%info,
-path=>'/',
);
#print $query->header();<----line 154
print $query->header(-cookie=>$cookie);
I have no problem with this part. The cookie seems to be in the correct format when I uncomment line 154. I am reading the cookie in this fashion.
use CGI;
$database = new CGI;
%info = $database->cookie('somecookie');
#print $database->header();
# while (($key, $value) = each %info){
#print "$key => \"$value\"<BR> , \n";}
#print "PERL VERSION: $]<BR>" ;
I have no problem getting the cookie on a NT server running IIS but on a *nix server running Apache I am not retreiving the cookie? I am not sure why this seems to be such a simple procedure but it still does not work on *nix.
HELP PLZ, (frustrated)
Thanks in advance....Haunter