Создаю сессию в index.pl так:
| Код |
our $cgi = new CGI;
my %cookies = fetch CGI::Cookie;
#my $CGISESSID = $cgi->cookie("CGISESSID") || undef;
my $sesU = new CGI::Session("driver:File", $cgi->cookie("VFMCGISESSID")||undef, {Directory=>'/tmp'});
$cookie = $cgi->cookie( VFMCGISESSID => $sesU->id );
print $cgi->header(-cookie=>$cookie);
|
Доступ к параметрам сессии из index.pl работает, но при обращении к значению параметра сессии из другого модуля (мой модуль mainmnu.pm) происходит такая вот ошибка:
| Цитата | | Can't call method "param" on an undefined value at content/mainmnu.pm line 25. |
Вот 25-я строка:
| Код |
print $main::sesU->param("UsId");
|
В этом модуле у меня стоит use strict. Если это ограничение убрать - всё ОК. А как с ним работать? Нужно как-то чего-то указать компилятору...
А чего? |