あっとでも $GB->{COOKIES}{}の中身はもうすでにサプレスされているというか
重複ははじいたあとなんだった

foreach (split(/[&,;]\s*/, $ENV{HTTP_COOKIE} || '')) {
(my $key, $_) = split(/=/, $_, 2);
$GB->{COOKIES}{$key} = $_ if (defined $_ && !exists $GB->{COOKIES}{$key});
}

生のは再度 $ENV から持ってこなきゃっすね
お騒がせしました。