|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Nataly Melekhovets 2:5085/30 28 Feb 2001 15:48:08
To : Alexander Averbuh
Subject : Re: Объясните в чем дело
--------------------------------------------------------------------------------
Салям, Alexander-джан!
23 Фев 01 20:22, Alexander Averbuh -> All:
AA> my $cookie=cookie(-name => 'Favorite',
AA> -value => 'Apple',
AA> -expires => '+2d');
AA> print header(-cookie => $cookie);
AA> print "Hello from cookie";
Я тут не так давно на те же грабли наступала ;-))
1. Кука точно выставлена ? Браузеру сказать, чтобы у тебя разрешение спрашивал.
И плюс по переменным окружения посмотреть. Плюс распечатай ее значение.
AA> Имеем скрипт, читающий куку. Вот он-то и не хочет выводить ее
AA> значение. Сабж.
Значит ее просто нет.
AA> === Cut ===
AA> #!perl -w
AA> use CGI qw(:all);
AA> use strict;
AA> print header();
AA> print "Favorite=",cookie('Favorite');
AA> === Cut ===
Я, ИМХО, делала так.
$cookie_id=cookie('Favorite');
print header();
print "My cookie Favorite=$cookie_id\n";
Для себя сделала такой вывод, может и не правильный. Что хочешь спросить у
сервера, надо спрашивать _до_ выдачи header();
With *.*
Nataly
... Сколько водки не беpи,все pавно два pаза бегать!
---
* Origin: Hotin Yurt -= Toshkent Ozbekiston =- (2:5085/30)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
