[perl][Mojo] Catalystの作者が作ってる依存関係の少ないWAF Mojolicious をいじってみた。 - のぶじゃすBLOG

[lib/SimpleWiki.pm] package SimpleWiki; use strict; use warnings; use base 'Mojolicious'; use SimpleWiki::Model; __PACKAGE__->attr( model => sub { SimpleWiki::Model->new } ); # This method will run once at server start sub startup { my $self = shift; # Routes my $r = $self->routes; # Default route $r->route('/:id/:action') ->to(controller => 'entry', id => 1, action => 'read'); $self->model->datad