The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
% use Mojo::ByteStream qw/b/;

This is the page for <%= $tab %> for
<%= $object %> <%= $key %>.
<pre class="toto_code">
get '/<%= $object %>/<%= $tab %>/*key' => sub {
% if ($self->app->routes->namespace) {
    # or define <%= $self->app->routes->namespace %>::<%= b($object)->camelize %>::<%= $tab %>()
% }
    ...
} => '<%= $object %>/<%= $tab %>';

# templates/<%= $object %>/<%= $tab %>.html.ep
This is the page for
&lt%= $tab %&gt; for &lt;%= $object %&gt;
&lt;%= $<%= $object %>-&gt;key %&gt;
</pre>