The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

TL::Session - Session class (ja)

NAME (ja)

TL::Session::JA - ��祉����激�с�

SYNOPSIS

  $TL->startCgi(
      -DB      => 'DB',
      -Session => 'Session',
      -main        => \&main,
  );

  sub main {
      my $session = $TL->getSession('Session');

      my $oldValue = $session->getValue;
      
      $session->setValue(12345);

      ...
  }

DESCRIPTION

64bit膃☗埇�<����贋�医�ゃ�勛�∞��罘���純�������c����祉����激�с�括�∞����壔�í�鴻��

��祉����激�с�潟��64bit膃☗埇�<����贋�遺札紊���勉����若�帥����������宴����ŝ����冴�������勌����勉����若�帥��膊∞�������������翫����壔�� ��祉����激�с�潟�㏍�若����������ラ��膊∞��������綽�荀�������������

��祉����激�с�潟�㏍�若�壔�� ��阪�������c�˨�� ��� TL::Filter::HTML ���篏睡�������⓾�������翫����� ��壔����㏍�� ��˨�� TL::Filter::MobileHTML ��勐�翫����� ��壔����� ��˨����������������水�ャ�����������

��障����� ��ュ�������c�˨�� ��� TL::InputFilter::HTML ���篏睡�������⓾�������翫����� ��壔����㏍�� ���������TL::Filter::MobileHTML ��勐�翫����� ��壔����� ���������������������茯㏍�水��������������

Session��� DB ���篏睡�������⓾�祉����激�с�潟�勛�∞�����茵�������

�����㏍�違�í����㋙�����DB�・膓������掩�����������������篁ヤ����勛�鴻��羈���������ŝ�������違�ŝ����ŝ�����

��祉����激�с�潟�勖��篏���壔�������í�潟�吟�壔�激�с�割賢�����潟����若����˨�㏍����壚賢��˨�虁�������ŝ�����
��潟�潟����潟����勐�阪�����篏���壔�������í�潟�吟�壔�激�с�割賢�����潟����若����˨�㏍����壚賢��˨�虁�������ŝ�����

METHODS

$TL->getSession
  $session = $TL->getSession($group)

TL::Session ��ŝ����吾�с�壔��������緇���� 綣���違�˨�� ini ��ц┃絎���������違�˨�若��������羝<����������ュ櫝�純��

�����勉�<�純�������壔�� TL#startCgi ��勐�若�喝�冴�������� -Session => '(Ini��違�˨�若�����)' ��ф��絎������������違�˨�若����勉�祉����激�с�潟�������劫�� ��������⓾����ŝ�������� die ���������

綣���亥����ユ����� 'Session' ��違�˨�若�����篏睡��������������

isHttps
  $session->isHttps

�憜����勉�ŝ�壔����鴻�����https��ŝ��1��������������с�ŝ��������undef���菴�������

  if ($session->isHttps) {
      ...
  }
get
  $sid = $session->get

��⓾����若�壔�ŝ�祉����激�с�潟�㏍�若�����緇����������

��祉����激�с�潟�㏍�若��64bit膃☗埇�<����贋�医�ゃ����ŝ�����

Perl��с�奝��絽�32bit��贋�医�ゃ�障�с�������宴����ŝ�������������祉����激�с�潟�㏍�若����医�ゃ�������〠�宴�c�⓾�壔�ŝ����ŝ�����

��祉����激�с�潟��絖���������ŝ�������違����域����̥�肴�����������

��祉����激�с�潟�勛�肴����壠幻��̬��������double ��≪�若�������勰��SSL��眼�������� get ��<�純�������若�喝�冴����с����祉����激�с�潟�虁┃絎������������� ������������SSL��眼�������≪�壔�祉�鴻����������˨�祉����激�с�潟����≦�鴻�˨�ŝ����������������勖����˨�祉����激�с��ID��壠��篏����������������

�����勉�<�純�������勐�若�喝�冴����壔����潟�潟����潟�������若�帥��菴���������̬�������ŝ�������違�ŝ����ŝ�����

renew
  $sid = $session->renew

��違�������⓾����若�壔�ŝ�祉����激�с�潟�㏍�若����肴�����������緇����������

篁ュ����勉�祉����激�с�潟�㏍�若��絖������������翫����������勉�祉����激�с�潟�㏍�若�夌�≦�鴻����ŝ����� ��障�����篁ュ����勉�祉����激�с�潟�˩��絖���������⓾�������ゃ����贋��������������

�����勉�<�純�������勐�若�喝�冴����壔����潟�潟����潟�������若�帥��菴���������̬�������ŝ�������違�ŝ����ŝ�����

discard
  $session->discard

�憜����勉�祉����激�с�潟�㏍�若����≦�鴻�˨��������

�����勉�<�純�������勐�若�喝�冴����壔����潟�潟����潟�������若�帥��菴���������̬�������ŝ�������違�ŝ����ŝ�����

setValue
  $session->setValue($value)

��祉����激�с�潟����ゃ��荐㊤�����������

荐㊤����с�������ゃ�� '64bit膃☗埇�<����贋��' ��勉�帥�� �����勌����勉����若�帥��膊∞�������������翫����壔����祉����激�с�潟�㏍�若����������☗�ラ��絎�茖�������綽�荀�������������

double��≪�若����勐�翫����壔��SSL莎桁�������勐�翫����̹��������筝≧�鴻�勉�祉����激�с�潟����吾��莨若�障�������� double��≪�若����ч��SSL��眼����������勉�<�純��������篏帥�c�⓾�祉����激�с�潟����御����������������������翫����� https��≪�若����ч��SSL��眼�������吾�������������������������翫����� die ���������

�����勉�<�純�������勐�若�喝�冴����壔����潟�潟����潟�������若�帥��菴���������̬�������ŝ�������違�ŝ����ŝ�����

getValue
  $value = $session->getValue

��祉����激�с�潟�������ゃ�����緇����������

��祉����激�с�潟��絖���������ŝ����翫����� undef ���菴�������

getSessionInfo
  ($name, $sid, $checkval) = $session->getSessionInfo

��祉����激�с�恰����宴�����緇����������

��壔����㏍�若�������í�若����˨�祉����激�с�潟��篆�絖������������勐��腱違����祉����激�с�潟�㏍�若�������с����壠�ゃ��菴������� �����с����壠�ゃ�壔���憜����勉�ŝ�壔����鴻����� https/http ��˨����c�☖戎�����������⓾����������勉��菴������������� �����勉��������double ��≪�若����勐�翫������憜����勉�ŝ�壔����鴻����倶�����綽������⓾����с����壠�ゃ����違�ŝ�����

��祉����激�с�潟��絖���������ŝ����翫����� $sid���$checkval ��˨�� undef ���菴�������

Ini �����í�<�若�

mode
  mode = double

荐㊤���櫝�純�ɱ�ゃ�壔��'http'��� 'https'��� 'double'��勉�������������������ュ櫝�純��

��������í�˨�����double���

http��≪�若��

SSL��с�勌��茘激����ŝ����祉����激�с�潟����ñ�����������http/https��勌検��鴻�т戎�����с�������������祉����激�с�潟�㏍�若��http��眼�����羲闆í������櫝�醇�с�����������������https��������������≪�壔�祉�鴻�������翫����������������ɱ�������с�夌∈篆���с����ŝ�����������羈����������綽�荀�������������

https��≪�若��

SSL��с�勌��茘激����������祉����激�с�潟����ñ�������������祉����激�с�潟�㏍�若��http��眼�������勖�闆í����蚊�����������http���篆>����˨�壠�阪����������ŝ�����https��眼�с�勉�帥�祉����激�с�潟�吾�勉�≪�壔�祉�鴻���櫝�純��

double��≪�若��

http��眼��https��眼�т�������˨�祉����激�с�潟��綣泣����� https��眼�������勉�帥�祉����激�с�潟�吾�勖�吾��莨若�帥�紫�贋�����茵������������勰�����http��眼�勉�祉����激�с�恰����宴�������������吾�������������������� http��眼��������https��眼�������祉����������������祉����激�с�恰����宴�勐����с�勉�帥����堺�ャ�����

http��眼�壔�祉����激�с�潟�㏍�惹�闆í�勐�演�堺�с�������������������ɱ�������с�夌∈篆���с����ŝ��������https��眼�壠�������ɱ�������с��腆坂����с��������http��眼�������祉����激�с�潟�㏍�若��羲闆í�������翫����с�����https��������с�勉�≪�壔�祉�鴻�壠�������с��������

                http������茯㊧昭    http��������梧昭    https������茯㊧昭   http��������梧昭
  http��≪�若��    ���              ���              ���              ���
  https��≪�若��   C<die>             C<die>             ���              ���
  double��≪�若��  ���              C<die>             ���              ���
  cookie = Cookie

http��������т戎�����������壔����㏍�若�勉�違�˨�若�����������絎���������������ュ櫝�純��

��������í�˨�����'Cookie'���

securecookie

https ��������т戎�����������壔����㏍�若�勉�違�˨�若�����������絎���������������ュ櫝�純�� secure�����í�違��篁������⓾����ŝ�������違����í�若����ŝ�����

��������í�˨�����'SecureCookie'鐚

timeout
  timeout = 30 min

���絎���勖�����腟������������祉����激�с�潟�夌�≦�鴻�����������綺☁�頫� �����с�������ュ櫝�純�� �����㏍�� timeout - updateinterval ��勖�������с�帥�ゃ����≪�⓾���������櫝�醇�с�����������

��������í�˨�����30min���

updateinterval
  updateinterval = 10 min

���腟���贋�井����祉��������絎�������篁ヤ��腟���������⓾�����������DB��勖�贋�井����祉����贋�違��������綺☁�頫� �����с�������ュ櫝�純�� �����㏍�� timeout - updateinterval ��勖�������с�帥�ゃ����≪�⓾���������櫝�醇�с�����������

��������í�˨�����10min���

setvaluewithrenew
  setvaluewithrenew = 1

setValue�����������̬�ɱ��������renew���茵���������⓾����� 0��勐�翫�����茵������ŝ����� 1��勐�翫�����茵�������

��������í�˨�����1���

dbgroup
  dbgroup = DB

篏睡��������DB��勉�違�˨�若�������� ini ��ц┃絎���������違�˨�若��������羝<����� TL#startCgi ��ф����劫�������ŝ�������違�ŝ����ŝ�����

dbset
  dbset = W_Trans

篏睡����������吾��莨若�睡��DB��祉����������� TL#startCgi ��ф����劫�������ŝ�������違�ŝ����ŝ����� ini ��ц┃絎���������違�˨�若��������羝<�����

readdbset
  readdbset = R_Trans

篏睡��������茯㏍�粋昭��睡��DB��祉����������� TL#startCgi ��ф����劫�������ŝ�������違�ŝ����ŝ����� ini ��ц┃絎���������違�˨�若��������羝<�����

�����ャ����������翫����� dbset ��������������勉��篏睡��������������

sessiontable
  sessiontable = tl_session

��祉����激�с�潟�т戎��������������若����������� ��������í�˨����� tl_session_��違�˨�若����� ���篏睡��������������

csrfkey csrfkey = JLapCbI4XW7G8oEi

addSessionCheck������haveSessionCheck��т戎�����������㏍�若�� ��泣�ゃ��罸������ゃ��紊���眼�����綽�荀���с�����������

SEE ALSO

TL
TL::Cookie
TL::DB
TL::Filter::HTML
TL::Filter::MobileHTML
TL::InputFilter::HTML
TL::InputFilter::MobileHTML

AUTHOR INFORMATION

    Copyright 2006 YMIRLINK Inc. All Rights Reserved.

    This framework is free software; you can redistribute it and/or modify it under the same terms as Perl itself

    �����勉����㋘�若����壔�若�壔�壔����ŝ�若�純�������⓾�с�≪�с����������ŝ����� Perl �����������í�ゃ�祉�潟�鴻�� �����у�����絽������喝����眼��茵���������������堺�ャ�障�����

    Address bug reports and comments to: tl@tripletail.jp

    HP : http://tripletail.jp/