ガードオブジェクトをログやタイマーに活用する : D-7 <altijd in beweging>小ネタ。僕はPerlのガードオブジェクトが大好きです。 例えばPSGIサーバーのリクエスト のログを出したい。ついでにどこのURLにアクセスされた時のログなのかも書き出したい。普通に考えると出力全てにURLをいれておけばいいんだけど、URLが長いとログが見にくい。 [/path/to/this/action?foo=1&bar=2&baz=3&hogehogehogehogehoge=1234] This is a debug log! それならリクエスト開始と終了を区切ればどこからどこまでかわかるよね！ってことでガードで実装すると良い感じ use strict; use Log::Minimal; use Scope::Guard; use constant DEBUG => 1; sub handle_psgi { my ($self, $env) = @_; my $guard; i
