in reply to Re: Crashing Cookie Code
in thread Crashing Cookie Code
%cookies = fetch CGI::Cookie; print "<br>Fetched Cookie<br>\n"; print Dumper %cookies; # Prints nothing!!! print "<br>Just dumped cookie hash.<br>\n"; if(%cookies ne undef) { # We get here, so %cookies is defined print "Keys: "; foreach (keys %cookies) # Finds no keys!!! { print; print " "; } print "<br>---<br>"; if($cookies{'ID'} ne undef) { # Tried as a plain hash, hashref, with and without '->value' my $hashref = $cookies{'ID'};#->value; $username = $$hashref{'username'}; $password = $$hashref{'password'}; print "Username: $username<br>"; print "Password: $password<br>"; } else { # We keep ending up here!!!! print "Damn!<br>\n"; } }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Re: Re: Crashing Cookie Code
by Masem (Monsignor) on Jun 19, 2001 at 17:37 UTC | |
|
PROBLEM FIXED
by quill (Initiate) on Jun 19, 2001 at 19:42 UTC |