我试图用parse_on_demand如图: http://search.cpan.org/~flora/Catalyst-Runtime-5.80007/lib/Catalyst.pm#ON-DEMAND_PARSER
不过,我似乎无法停止上传。 我只是通过创建立刻死亡,但是浏览器似乎上传我选择了非常大的文件,它曾经达到我的动作之前的动作测试此:
sub upload :Local {
my ($self, $c) = @_;
die;
# What I'd like to do is this:
# if ($c->req->header('Content-Length') > $some_limit) {
# die "Upload too large";
# }
# ... check filename extension and mime-type...
}
这是接近上传验证的正确方法?