12 Things I dislike with CGI::Application タイトルはmiyagawaさんからインスパイア。12個も書いてない。 1.runメソッドへ機能が集中しすぎ CGI::Applicationをいじり始めると気になるのは、runメソッドへ機能が集中しすぎているところだと思う。 しかもちょっとスパゲティ。 sub run { my $self = shift; my $q = $self->query();#クエリーを呼び出し #RUNMODEの決定 my $rm_param = $self->mode_param() || croak("No rm_param() specified");# my $rm; if (ref($rm_param) eq 'CODE') { $rm = $rm_param->($self); 〜〜〜略〜〜〜 #__CURRENT