On 2/20/07, Sumit Shah <[EMAIL PROTECTED]> wrote:
I printed out the contents of the Cookie attribute in the request header and I can see the cookie present in the header. I read all the contents into a hash and then try to check for its existence. The if(exists($hashMap{'SSOTokenID'})) condition fails. Does it have anything to do with data types?
No, Perl doesn't usually have those kinds of problems.
my $cookie = $r->headers_in->{'Cookie'}; my @cookieArray = split(";",$cookie); my %hashMap; my $cookieItem; foreach $cookieItem (@cookieArray){ my @subArray = split("=",$cookieItem); my $key = $subArray[0]; my $value = $subArray[1]; $hashMap{$key}=$value; } my $k; my $v; while ( ($k,$v) = each %hashMap ) { $log->error("$k => $v"); }
What do you see log at this point? A simpler way to dump a hash is like this: use Data::Dumper; warn Dumper(\%hashMap); - Perrin