[僕] オブジェクト指向万歳！

たろマーク（はてなブックマーク）

« めざにゅ～の杉崎さん | トップ | 今日のココリコミラクルタイプ »

2004年04月06日

■ [oop][perl] オブジェクト指向万歳！

どし～Σ(ﾟ口ﾟ；
回りくどいし、面倒な分、楽になるトコは非常に楽だｗ
メインが非常に読みやすくなった。
コメントもういらねぇ＜後で困るのは自分ですｗ

継承とか、多重継承とか使ってない分、
オブジェクト指向といえるものかどうかは分かりませんがｗ

あれよあれよという間に、ログイン/アウトなCGIが完成しちまったです。
CGI::Sessionはスバラシイ！
CPAN万歳！

びるずさんに命名してもらったモジュールを使ったときはこんな感じ（ぉ

my $tt = TToolKit->new;
$tt->Output($html);

あぁ、Outputするんだな、と言う感じですっきりしていて、分かりやすい。
＃なんでいちいち、Outputなんてメソッド用意したかは聞かないでくださいｗ
＃printすればいいじゃんとかｗ
＃HTML::Template使えよとか。CGIモジュールは出力には使わねぇのかよ、とか。
＃ん？メソッド？インスタンス？（混乱ｗ

あー、こんなこと書いてる間に、
もう少し上手い方法見つけたΣ(ﾟ口ﾟ；

# ログインチェック
my ($login_flag,$error) = $login->check($q,$session,$dbh);
これ、戻り値二つも必要ないなΣ(ﾟ口ﾟ；
エラーがあるかないかだけで判別すりゃいいじゃん＿|￣|○

そんなこんなで、もう少し楽しみます～ｗ

投稿者: 海賊たろ（小松大輔）日時: 2004年04月06日 17:38 | パーマリンク |