Help for this page
# cache session here instead of flushing/reading from cookie all the t +ime my $SESSION = undef;
sub init { my ($self) = @_; $SESSION = undef; # <- new bit.