From b923892b5a4d128fd429239bc612f76d0d37fd78 Mon Sep 17 00:00:00 2001
From: Masahiro Nagano <kazeburo@gmail.com>
Date: Wed, 28 Sep 2016 00:47:16 +0900
Subject: [PATCH] disallow , as a delimiter

---
 lib/Cookie/Baker.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Cookie/Baker.pm b/lib/Cookie/Baker.pm
index 96da93f..203bba1 100644
--- a/lib/Cookie/Baker.pm
+++ b/lib/Cookie/Baker.pm
@@ -87,7 +87,7 @@ sub pp_crush_cookie {
     my $cookie_string = shift;
     return {} unless $cookie_string;
     my %results;
-    my @pairs = grep m/=/, split "[;,] ?", $cookie_string;
+    my @pairs = grep m/=/, split "; ?", $cookie_string;
     for my $pair ( @pairs ) {
         # trim leading trailing whitespace
         $pair =~ s/^\s+//; $pair =~ s/\s+$//;