我一直在尝试基于Perl的Mojolicious web框架。 我有尝试开发一个完整的应用程序,而不是精简版。 我现在面临的问题是,我试图将文件上传到服务器,但下面的代码无法正常工作。
请指导我什么是错的。 此外,如果文件被上传则是它的应用程序或其他一些地方的公共文件夹中。
提前致谢。
sub posted {
my $self = shift;
my $logger = $self->app->log;
my $filetype = $self->req->param('filetype');
my $fileuploaded = $self->req->upload('upload');
$logger->debug("filetype: $filetype");
$logger->debug("upload: $fileuploaded");
return $self->render(message => 'File is not available.')
unless ($fileuploaded);
return $self->render(message => 'File is too big.', status => 200)
if $self->req->is_limit_exceeded;
# Render template "example/posted.html.ep" with message
$self->render(message => 'Stuff Uploaded in this website.');
}