gist:95d51f44a6ae1c9cc20c

gistfile1.pl �� A�U � A�U use Kossy; use Plack::Session; sub Plack::Session::new { my ($class, $env) = @_; my $self = bless { session => $env->{'psgix.session'}, options => $env->{'psgix.session.options'}, }, $class; for my $flash_key ( grep { m/^__flash__/ } keys %{$self->session} ) { delete $self->options->{no_store}; delete $self->session->{$flash_key}; my $key = substr($flash_key,9); $self->{

[kazeburo]

Plack::Sessionにむりやりflashを追加するとこんな感じかな。。