[Perl]セッション管理でCGI::Sessionを使う。

ログイン機能を実装するために、以前神様に聞いたセッション機能を使ってログイン状態を保持しようと考えました。

そこで候補に挙がったのが

cpan CGI::Session

サーバーにも入ってたし、今回はインストールの必要もありませんでした。

#! /usr/bin/perl

use strict;
use warnings;
use CGI;
use Data::Dumper;

use CGI::Session;

my $session = new CGI::Session("driver:File", undef, {Directory=>'/tmp'});

$session->param('f_name' => 'Sherzod');

print Dumper $session;
print Dumper "\n";
print Dumper $session->id();
print Dumper "\n";
print Dumper $session->param('f_name');

上の通りでデータの出し入れは出来るみたい。

セッションを使うと何かと便利になりそうです。