世のCatalystマンセームードに対し、Sledgeマンセー派の抵抗も静かに盛り上がりつつ(?)ありますが。 http://hori-uchi.com/archives/000409.html ワタクシもSledgeユーザーのはしくれとして、というわけでもないですが、初めてのSledgeプラグインを書いてみました。 といっても、通常のPerlのオブジェクトをJSONデータに変換して出力するってだけですが。 Sledge::Plugin::JSON 使いかたはこんな感じ。 package Your::Pages; use Sledge::Plugin::JSON; sub dispatch_foo { my $self = shift; my $obj = {}; # (scalar|hash|array) reference $self->output_json($obj); }まあ、こ