Смена пароля в личном кабинете. Проблема с печеньками.

[antony]

Добрый день коллеги.
Подскажите, не работает смена пароля в ЛК, точнее что-то не понятное с куками происходит.

ABillS 0.50b (GT: 0.192586) UP: 12:31PM

При входе на ЛК куки не создаются. (Firefox). Пробовал разные браузеры.

При нажатии на кнопку "Сменить" выкидывает на окно входа.

При просмотре списка кукисов - пустота, в логах ошибок не видно.

[antony]

Временно выкрутился вот так:

В /usr/abills/cgi-bin/index.cgi там где setCookie добавил:

после каждой $html->setCookie блаблабла
print "Set-Cookie: блаблабла

Код: Выделить всё

#Cookie section ============================================
if (defined($FORM{colors})) {
  my $cook_colors = (defined($FORM{default})) ?  '' : $FORM{colors};
  $html->setCookie('colors', "$cook_colors", "Fri, 1-Jan-2038 00:00:01", $web_path, $domain, $secure);
  print "Set-Cookie: colors=$cook_colors; \n";
 }
#Operation system ID
$html->setCookie('OP_SID', "$FORM{OP_SID}", "$cookies_time", $web_path, $domain, $secure) if (defined($FORM{OP_SID}));
$html->setCookie('language', "$FORM{language}", "Fri, 1-Jan-2038 00:00:01", $web_path, $domain, $secure) if (defined($FORM{language}));
print "Set-Cookie: OP_SID=$FORM{OP_SID}; \n";
print "Set-Cookie: language=$FORM{language};\n";

if (defined($FORM{sid})) {
 $html->setCookie('sid', "$FORM{sid}", "$cookies_time", $web_path, $domain, $secure);
 print "Set-Cookie: sid=$FORM{sid};\n";
}

И помогло. А почему setCookie не может выставить нормально печеньки?