VPF::Глюки при записи в куки - Форум программистов

Wowa

Дата 19.4.2002, 09:10 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Админ
Сообщений: 15017
Регистрация: 14.9.2000
Где: Винград

Репутация: нет
Всего: 290

Произвожу запись в куки. Проблема в том, что иногда все записывается, так как надо, а иногда вообще не записывается. Как вы думаете, в чем дело?
Вроде все ясно и просто.

Код


sub add_to_recycled {
$HD_compshop_rec = cookie("HD_compshop_rec");

if (!$HD_compshop_rec) {		
$c = cookie(-name    =>  'HD_compshop_rec',
            -value   =>  "$in{id_pr}",
            -expires =>  '+M'
           );
}
else {
$c = cookie(-name    =>  'HD_compshop_rec',
            -value   =>  "$HD_compshop_rec|$in{id_pr}",
            -expires =>  '+M'
           );
}

Dager

Дата 19.4.2002, 22:52 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 29
Регистрация: 28.3.2002
Где: Каменец-Подольски й

Репутация: нет
Всего: нет

Цитата(Admin @ 19.4.2002, 10:10)

Код


sub add_to_recycled {
$HD_compshop_rec = cookie("HD_compshop_rec");

if (!$HD_compshop_rec) {		
$c = cookie(-name    =>  'HD_compshop_rec',
            -value   =>  "$in{id_pr}",
            -expires =>  '+M'
           );
}
else {
$c = cookie(-name    =>  'HD_compshop_rec',
            -value   =>  "$HD_compshop_rec|$in{id_pr}",
            -expires =>  '+M'
           );
}

короче попробуй так
use CGI;
$query=new CGI;

$ce=$query->cookie(
-name => 'HD_compshop_rec',
-value => "$in{id_pr}",
-expires => '+M'
);

print $query->header(-cookie=>$ce);

имхо, должно работать

да, если уж совсем невмогу -- написать руками движок для сета куков совсем не сложно

Wowa

Дата 20.4.2002, 09:49 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Админ
Сообщений: 15017
Регистрация: 14.9.2000
Где: Винград

Репутация: нет
Всего: 290

Оказалось смешно. На локалке все работало как-надо, а вот на сервере не хотело. Помогла строка:
-path => '/'

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: разработка для Web \| Следующая тема »