Вот как я инициализирую сессии:

Код

#!E:/Perl/bin/perl -w use CGI::Session; use CGI qw/:standard/; my $cgi = new CGI; my $session = new CGI::Session("driver:File", undef, {Directory=>'/tmp'}); print $cgi->header(-cookie=>$cookie); $session->param('f_name', 'Sherzod'); my $f_name = $session->param('f_name'); $session->flush(); print '<BR>Effective CGISESSID='.$session->id();

Первый код работает кроме строчки: $session->flush(); -запись данных о сессии на винт не происходит. При этом в логи ложится такая инфа:
Цитата

Цитата

[Mon Sep 27 10:18:49 2004] [error] [client 127.0.0.1] Can't locate auto/CGI/Session/autosplit.ix in @INC (@INC contains: E:/Perl/lib E:/Perl/site/lib .) at E:/Perl/lib/AutoLoader.pm line 160. [Mon Sep 27 10:18:49 2004] [error] [client 127.0.0.1]  at CGI/Session.pm line 9

А вот как я пытаюсь воссоздать сессию в другом скрипте:

Код

#!E:/Perl/bin/perl -w use CGI qw/:standard/; use CGI::Cookie; use CGI::Session; print '<H4>Test Sessoins</H4>'; my $CGISESSID = $cookies{CGISESSID}->value; print 'CGISESSID='.$CGISESSID; my $session = new CGI::Session("driver:File", $CGISESSID, {Directory=>'/tmp'}); print '<BR>Effective CGISESSID='.$session->id();

Как следствие глюка в первом скрипте, этот (второй) скрипт не делает то, чего от него требуется. А именно: он не создаёт новую сессию. При этом в логи ложит такую фигню:
Цитата

Цитата

[Mon Sep 27 10:20:16 2004] [error] [client 127.0.0.1] Can't locate auto/CGI/Session/autosplit.ix in @INC (@INC contains: E:/Perl/lib E:/Perl/site/lib .) at E:/Perl/lib/AutoLoader.pm line 160. [Mon Sep 27 10:20:16 2004] [error] [client 127.0.0.1]  at CGI/Session.pm line 9 [Mon Sep 27 10:20:16 2004] [error] [client 127.0.0.1] Can't locate auto/CGI/Session/File/expire.al in @INC (@INC contains: E:/Perl/lib E:/Perl/site/lib .) at CGI/Session.pm line 258

Помогите, плиз, решить проблему.

Судя по сообщениям из лога, у тебя установлен не полностью или не правильно модуль CGI::Session, некоторых файлов просто не хватает, точнее их нет в каталогах где Perl ищет свои модули.

Попробуй найти с помощью поисковика Windows следующие файлы:
autosplit.ix
expire.al
autosplit.ix
Если эти файлы будут найдены, то в начале каждого скрипта добавь такую строку:

use lib qw( путь_к_каталогу_с наденными_файлами );

Хотя на твоё месте я бы воспользовался PPM для переустановки модуля CGI::Session. У меня он установился без проблем.

Удачи.

korob2001, спасибо, за хэлп.
Я тоже думаю, что у меня нелады с CGI::Session. Но я и ставил его при помощи PPM! И тоже установился без проблем.

Файлов autosplit.ix - у меня штук 20! Добавить путь к каждому из ниХ?
А expire.al - нет ни одного...

Что делать?

Запусти, плиз, аську, если можешь.

Помог Korob:
Помогла дополнительная установка подмодуля CGI::Session.

В ppm нужно было выполнить search CGI::Session.

В результате получил спиосок из 10-ти модулей. Помогла установка первого из них:
install 1

Хотя рекомендуют ставить все 10