Re: Weird Regex in CGI::Cookie


laziness, impatience, and hubris
	PerlMonks

Re: Weird Regex in CGI::Cookie

by enoch (Chaplain)

Log in
Create a new user
The Monastery Gates
Seekers of Perl Wisdom
Meditations
Cool Uses For Perl
Obfuscation
Tutorials
Poetry
Reviews
Perl News
Donate
Recent Threads
Newest Nodes
Super Search
PerlMonks Discussion
What's New

on Oct 16, 2003 at 04:39 UTC ( #299653=note: print w/replies, xml )

Need Help??

in reply to Weird Regex in CGI::Cookie

I emailed in the following patch:

--- /usr/local/lib/perl5/5.6.1/CGI/Cookie.pm
+++ /usr/local/lib/perl5/5.6.1/CGI/Cookie.pm.new
@@ -42,7 +42,7 @@

     my(@pairs) = split("; ?",$raw_cookie);
     foreach (@pairs) {
-      s/\s*(.*?)\s*/$1/;
+      s/^\s+//; s/\s+$//;
       if (/^([^=]+)=(.*)/) {
        $key = $1;
        $value = $2;
[download]