keywords.pl

    # Simple "resource" keyword
    $r->add_keyword(resource => sub {
        my ($r, $name) = @_;

        # Generate "/$name" route
        my $resource = $r->route("/$name")->to("$name#");

        # Handle POST requests
        $resource->bridge->to(cb => sub { shift->can_i_haz })
                 ->post->to('#create')->name("create_$name");

        # Handle GET requests
        $resource->get->to('#show')->name("show_$name");

        return $resource;
    });

    # POST /user -> {controller => 'user', action => 'create'}
    # GET  /user -> {controller => 'user', action => 'show'}
    $r->resource('user');