タグ $self
人気順 5 users 50 users 100 users 500 users 1000 users[tech] リクエストオブジェクトへ、型を明示するメソッドの追加 | Tue, Feb 26. 2013 - 氾濫原 [HANRANGEN]
ウェブアプリケーションを書くとき、最近はだいたい Plack::Request なりなんなりを継承して、そのプロジェクト専用のリクエスト/レスポンスオブジェクトを作ることにしている。特にリクエストオブジェクトは、リクエストのパラメータを適切に変換して返すようなメソッドを生やすことが多い。例えば以下の例: sub number_param { my ($self, $key, $limit) = @... 続きを読む
Plack::Middlewareでリクエスト終了後にごにょごにょする方法 - blog.nomadscafe.jp
Plack::Middlewareでリクエスト終了後になにがしかのか処理をしたい場合 sub call { my ($self, $env) = @_; my $t0 = [gettimeofday]; my $res = $self->app->($env); my $ela = Time::HiRes::tv_interval($t0); }; と書きそうになりますが、これだと $res が ... 続きを読む
「PerlのWebプログラミング効率化のTips」を読んだ感想 - サンプルコードによるPerl入門
「PerlのWebプログラミング効率化のTips」を読んだ感想を書く。PerlのWebプログラミング効率化のTipsデバッグのしやすいコードを書く ほとんど同意。でも少し注意点としては、小さくしすぎると、メンテナンスコストが上がって、ソースコードをいったりきたりしなくちゃいけなくて、可読性が下がりがちになっちゃうこと。 sub parse { my $result; # 処理1 $self->so... 続きを読む
404 Blog Not Found:Perl+JavaScript - 勝手に添削&移植 - 全裸で学ぶMVC事始め
The requested blog was not found -- unless you requested that of Dan Kogai (小飼 弾). 添削篇 具体的には、ここ。 sub zenrize { my ( $self, $sentence ) = @_; return unless $sentence; my $api = $self->{yahoo_ma}; my $r... 続きを読む