Спасибо, теперь работает.
Только все равно непонятно, почему прежний код
Код:
use CGI::Cookie;
if($ENV{'HTTP_COOKIE'}){
%cookies = fetch CGI::Cookie;
$str = $cookies{'name'}->value;
}
else {$str="guest";}
не работал
Цитата:
|
Я думаю что проблема в том что $ENV{'HTTP_COOKIE'} почти всегда выдает true, даже если конкретно $cookies{'name'}->value ничего и не содержит...
|
Код:
$str=$ENV{'HTTP_COOKIE'};
if($str ne ""){
%cookies = fetch CGI::Cookie;
$str = $cookies{'name'}->value;
}
else {$str="guest";}
По идее должно работать, но тоже не работает.