如何为所有传入的URL创建公共处理程序?

drv*_*iny 5 perl mojolicious mojolicious-lite

我正在编写一些web api,它以JSON格式返回数据.

对于所有传入的URL,如果缓存周期没有到期,我需要从缓存返回一些结果.

这种逻辑对所有URL都是通用的.

题:

如何在Mojolicious :: Lite中为所有传入的URL实现一些通用逻辑?

我试着这样做

any '/:bar' => [bar => qr/.+/] => sub {
 # ...
 # Return JSON object immediately from cache if it is applicable
 # ...
}
Run Code Online (Sandbox Code Playgroud)

但是这会导致非常长的页面加载和

Template "bar.html.ep" not found
Run Code Online (Sandbox Code Playgroud)

在morbo日志中(但是经过很长时间的延迟后,最终会执行"/ target"处理程序).

我是Mojo的完美新手,所以任何帮助都将受到赞赏

谢谢!

mob*_*mob 2

是的,before_dispatch挂钩似乎是正确的方法,并且它确实适用于Mojolicious::Lite. 这是一个概念验证,它将为每个唯一请求生成新结果,但为重复请求返回重复结果。在此程序中,常规请求处理程序填充缓存,但如果您想将该部分与代码的主要功能分开,您可以在挂钩中进行缓存after_dispatch

use Mojolicious::Lite;

our %CACHE;

any '/:any' => sub {
    my $self = shift;
    my $param = $self->param('any');
    my $result = { reqtime => time, param => $param, number => rand };
    my $path = $self->req->url->path->to_string;
    $CACHE{$path} //= $result;
    $self->render( json => $result );
};

app->hook( before_dispatch => sub {
    my $c = shift;
    my $path = $c->req->url->path->to_string;
    if (defined($CACHE{$path})) {
        $c->render( json => $CACHE{$path}, status => 200 );
    }
} );
app->secrets([42])->start;
Run Code Online (Sandbox Code Playgroud)

示例运行:

$ morbo cachedemo.pl >/dev/null 2>&1 &

$ for req in foo foo1 foo2 foo3 foo foo1
> do curl http://localhost:3000/$req ; echo ; sleep 1 ; done

{"number":0.848003210075227,"reqtime":1444254617,"param":"foo"}
{"number":0.0745738560703799,"reqtime":1444254618,"param":"foo1"}
{"number":0.484934245556467,"reqtime":1444254619,"param":"foo2"}
{"number":0.181112856445004,"reqtime":1444254620,"param":"foo3"}
{"number":0.848003210075227,"reqtime":1444254617,"param":"foo"}     <-- dup
{"number":0.0745738560703799,"reqtime":1444254618,"param":"foo1"}   <-- dup
Run Code Online (Sandbox Code Playgroud)