Forum Webscript.Ru

Программирование => Perl => Тема начата: Rawil от 24 Октября 2003, 14:33:37

Название: Perl + MySQL + Session - Плакать хочется !!
Отправлено: Rawil от 24 Октября 2003, 14:33:37

Друзья, помогите пожалуйста разобраться !!
Нужно сделать сессии Perl + MySql, вы скажете "CPAN" или "читай форум".... Я прочитал, все равно не понял.
Установил CGI-Session-3.95

на CPAN пишут создать таблицу (CGI::Session::MySQL)
-----------------------------------------------------
CREATE TABLE sessions (
        id CHAR(32) NOT NULL UNIQUE,
        a_session TEXT NOT NULL
    );
------------------------------------------------------
Я создал таблицу в базе "test"

новая сессия
------------------------------------------------------------------------
#!/perl/local/bin
use CGI::Session;
    $session = new CGI::Session("driver:MySQL", undef, {Handle=>$dbh});
-----------------------------------------------------------------------

Теперь вопросы !
Кто нибудь скажите немножечко конкретнее, что дальше ?? переменную $dbh нужно самому объявлять ?:
______________________________________
#!/perl/local/bin
use DBI;
$dbh = DBI->connect("DBI:mysql:host=localhost;database=test","login",pass")
____________________________________________
Или модуль все сам делает, тогда где же указать базу "test" ?

Короче я совсем запутался... Если кому то не в лом, объясните на конкретных примерах.
1) Создание новой сессии, запись её в базу;
2) Извлечение данных текущей сессии из базы;
3) Время жизни сессии, удаление неактивной сессии
И может я что то упусти, дополните

Название: Perl + MySQL + Session - Плакать хочется !!
Отправлено: NeoNox от 24 Октября 2003, 16:03:49

Никогда не использовал этот модуль, и если честно - то разбираться в нем лень. Посмотри в сторону Apache-Session. Он прост в использовании и многофункционален в тоже время.
http://search.cpan.org/~jbaker/Apache-Session-1.54/Session.pm