Amon2で$c->stashを使う。

Amon2自体は、意図的にstashは作ってないようなんですが、ずっとCatalystを使ってたのでstashあった方が便利かなーと。
で、$c->stashを追加してみた。

sub stash {
    my $self = shift;

    unless ( $self->{stash} ) {
        $self->{stash} = {};
    }
    return $self->{stash};
}

MyApp.pmでstashを追加。

コントローラーから使うとこんな感じでしょうか。

sub index {
    my ( $class, $c ) = @_;

    $c->stash->{'hoge'} = 1;

    $c->render('index.tt',$c->stash);
}

ってここまでやってみたけど、、結果stash無くても良いかも・・。