Создание серверных приложений на языке PERL


Работа с cookies на Perl - часть 2


Ключ -domain указывает полное или частичное имя сервера, для которого Cookie имеет силу. Браузер возвратит Cookie любому хосту, который соответствует полному или частичному имени указанному в этом ключе. На-пример, если Вы укажете имя домена .somesrver.com, то Cookie будет возвращено любому поддомену этого домена, будь то www.somesrver.com или vasya.somesrver.com. Если же этот ключ не определен, то будет установлено имя хоста по умолчанию, с которого был записан Cookie.

Ключ -path служит для указания пути к скриптам которые используют этот Cookie. Если Вы указываете путь /cgi-bin, то все скрипты в этом каталоге и в его подкаталогах получат Cookie, но скрипты расположенные в других каталогах, не являющихся подкаталогами /cgi-bin этот Cookie не получат.

Если установлен ключ -secure, то Ваш Cookie будет передаваться только по протоколу SSL. По обычному HTTP протоколу он передаваться не будет.

Дальше нобходимо передать созданный Cookie браузеру пользователя:

print header(-cookie=>$c);

Теперь как получить Cookie...

%cookies = fetch CGI::Cookie;

В результате этой операции мы получим хэш со значениями переданного от пользователя Cookie. Далее мы можем манипулировать полученными значениями

$SOMECOOKIE = $cookies{'SOMENAME'}->value;

После этой операции переменная $SOMECOOKIE будет иметь значение 'SOMEVALUE'.




Начало  Назад  Вперед