Мой файл cookie CGI-скрипта установлен и получен

Question

У меня есть сайт на CGI, и он работает нормально вчера, но вдруг его cookie перестают работать. Я не могу установить cookie и получить cookie в моем скрипте. ниже мой код.

Чтобы установить cookie

#!/usr/bin/perl
use CGI::Carp qw (fatalsToBrowser);
use CGI;
require "cookie.lib";
&SetCookies('V', $EncUID);

Чтобы получить печенье

#!/usr/bin/perl
use CGI::Carp qw (fatalsToBrowser);
use CGI;
require "cookie.lib";
&GetCookies();
my $UID = $Cookies{"V"};

Пожалуйста, помогите мне в этом.

Answer 1

Оу, это внезапно, как 199 раз. Заменить cookie.lib на CGI::Cookie.

#!/usr/bin/perl
use CGI::Carp qw(fatalsToBrowser);
use CGI;
use CGI::Cookie qw();

print CGI::header(-cookie => [CGI::Cookie->new(-name => 'V',-value => $EncUID)]);

---

#!/usr/bin/perl
use CGI::Carp qw(fatalsToBrowser);
use CGI;
use CGI::Cookie qw();

my %cookies = CGI::Cookie->fetch;
my $UID = $cookies{'V'}->value;