Re: Catalyst でテンプレートファイルがあったら表示するの術

Perl Catalyst

（タイトル考えるのって面倒）

    my $template = $c->req->path . '.tts';


    my $template = $c->action . '.tts';

の方がいいかも。アクションがindexとかdefaultの時のテンプレート名がおかしくなっちゃうので。（あと、Regex使ってる時とかマッチする奴全部を用意できないということも）



ちなみにC::V::TTは$c->actionを使ってる。

# --- TT.pm
sub process {
    my ( $self, $c ) = @_;

    my $template = $c->stash->{template}
      ||  $c->action . $self->config->{TEMPLATE_EXTENSION};