perlのlocalに助けられるとき
Catalystのsetup時なんかに設定されるconfigの値を一時的に設定し直したい、
でも他にも影響がでるので自分のところだけっていう時にlocalに助けられます。
変更前の値保持しておいて 変更して また前の値に戻すのってめんどくさいし。。。
例えばエラーメッセージのフォーマットを一時的に変えたい時
local FormValidator::Simple->messages->{_format} = '<span style="color:red">%s</span>';
例えばリクエストの値を一時的に汚染せずに変えたいとき
local $c->req->{parameters} = {}; $c->req->parameters->{'hoge'} = 'fuga';
。。。他にもあったのですが、思い出せない。。。