Catalystの練習 - 1行伝言板を再実装してみる(2)

1日でガッとやるつもりが、途中で休憩したままに（・ω・；
ということで再開。

現在の伝言板のソースから、index.ttをでっち上げる

UTF-8で保存しないと化けるね（・ω・；
あれ、グローバル変数はどうやって定義するんだろ。begin : Privateで読み込むようにしとけばいいかな。(設定関連(色とか)はデータベースにテーブルもつとか、独立したテンプレートに書くとかスマートなやり方は他にありそうだけど、とりあえずTMTOWTDIだ(言い訳))

sub begin : Private {
my ( $self, $c ) = @_;
$c->stash->{Table_Back1} = "#3333FF"; # reserve
$c->stash->{Table_Text1} = "#FFFFFF"; # reserve
$c->stash->{Table_Back2} = "#FF6633"; # お題字の背景色
$c->stash->{Table_Text2} = "#FFFFFF"; # お題字の文字色
$c->stash->{Table_Back3} = "#006666"; # reserve
$c->stash->{Table_Text3} = "#FFFFFF"; # reserve
$c->stash->{Kokuban_Back} = "#006666"; # 黒板の背景色指定
$c->stash->{Kokuban_Text} = "#FFFFFF"; # 日付/日直部分の文字色指定
}

既存スクリプトを書き直すだけで楽勝と思いきや、ぜんぜん進まないorz
CatalystとMySQLとTemplate-Toolkitをもう少し理解しないとだ…。