viewを追加してみる

Controllerを作ったので、今度はviewを追加してみる。

%perl script/itscontact_create.pl view TT

MyApp/root 以下にテンプレートを作成。index.ttとしておく。

• MyApp/root/index.tt

<p>[% title %] - index - </p>

コントローラを編集。

• MyApp/lib/iTSContact/Controller/appinfo.pm

package iTSContact::Controller::appinfo;

use strict;
use warnings;
use parent 'Catalyst::Controller';

sub index :Path :Args(0) {
    my($self,$c) = @_;
    $c->stash->{template} = 'index.tt';
    $c->stash->{title}    = $c->req->param('appname') || '';
    #$c->response->body('Hello,World!');                                        
}

http://**.local:3000/appinfo?appname=hoge　とすると

hoge -index-

みたいな具合になる。