chankoっぽいの考えたけどきつかった。

yaminabe.txt

# in templates/root/index.tx
# active_ifが真でなければ無視
# 真なら include yaminabe/name/templates/root/index.test.tx
$c.yaminabe.invoke('name', 'tag');

# in yaminabe/name/templates/root/index.tag.tx
<p><a href="<: uri_for('/user/like') :>">like</a></p>

package Yaminabe::App::Name;
use strict;
use warnings;

sub active_if {
    my ($self, $c) = @_;

    $c->user && $c->user->is_admin;
}

package Yaminabe::App::Name::Web::Dispatcher;
use strict;
use warnings;

get '/user/like' => sub { ... };