NAME
Egg::Plugin::SessionKit::TieHash - TIE HASH base class for session.
SYNOPSIS
use base qw/Egg::Plugin::SessionKit::TieHash/;
sub TIEHASH {
my $self= shift->SUPER::TIEHASH(@_);
.... ban, ban, ban.
$self
}
DESCRIPTION
The Egg object is always necessary for the argument.
sub TIEHASH {
my($class, $e)= @_;
$class->SUPER::TIEHASH($e);
}
config, new_entry, update_ok, rollback
It has the above-mentioned accessor.
If some changes are done as the value is substituted, 'update_ok' becomes ture.
# The first stage is false.
tied(%{$e->session})->update_ok < 1;
$e->session->{hoge}= 1;
# When the value is put, it is ture.
tied(%{$e->session})->update_ok > 0;
METHODS
- startup
-
The place today is a method of the dummy. Nothing is done.
SEE ALSO
Egg::Plugin::SessionKit, Egg::Release,
AUTHOR
Masatoshi Mizuno <lushe@cpan.org>
COPYRIGHT
Copyright (C) 2007 by Bee Flag, Corp. <http://egg.bomcity.com/>, All Rights Reserved.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.6 or, at your option, any later version of Perl 5 you may have available.