Catalyst::Plugin::Session::Store::Dummy - Doesn't really store sessions - useful for tests.


Catalyst-Plugin-Session documentation Contained in the Catalyst-Plugin-Session distribution.

Index


Code Index:

NAME

Top

Catalyst::Plugin::Session::Store::Dummy - Doesn't really store sessions - useful for tests.

SYNOPSIS

Top

    use Catalyst qw/Session Session::Store::Dummy/;

DESCRIPTION

Top

This plugin will "store" data in a hash.

METHODS

Top

See Catalyst::Plugin::Session::Store.

get_session_data
store_session_data
delete_session_data
delete_expired_sessions

Catalyst-Plugin-Session documentation Contained in the Catalyst-Plugin-Session distribution.

#!/usr/bin/perl

package Catalyst::Plugin::Session::Store::Dummy;
use base qw/Catalyst::Plugin::Session::Store/;

use strict;
use warnings;

my %store;

sub get_session_data {
    my ( $c, @keys ) = @_;
    @store{@keys};
}

sub store_session_data {
    my $c = shift;
    my %data = @_;

    @store{ keys %data } = values %data;
}

sub delete_session_data {
    my ( $c, $sid ) = @_;
    delete $store{$sid};
}

sub delete_expired_sessions { }

__PACKAGE__;

__END__