使用Test::Mojo帖子上传的文件为空

Question

我已经实现了一个Mojolicious Web服务作为通过POST接受文件上传的模块。一个示例 cURL 命令：

curl -X POST http://localhost:3000/process -F inputFile=@file.txt

这按预期工作，处理文件并返回结果。

我现在尝试使用 Test：：Mojo 像这样测试它：

my $t = Test::Mojo->new( 'TK::Proxy' );
my $data = {
inputFile => { filename => 't/file.txt' },
};
$t->post_ok('/process' => form => $data)
->status_is(200)

测试失败：

$ ./Build test
[...]
#   Failed test '200 OK'
#   at t/20_app.t line 44.
#          got: '400'
#     expected: '200'

调试代码会显示上传的内容为空。

我已经通过在测试前添加简单的打印来验证它是否找到了该文件：

open FILE,'<', 't/file.pdf' or die("Could not read file");
while (my $line = <FILE>) {
print STDERR ($line . "n");
}

这将按预期输出文件。

因此，我的结论是错误出在post_ok调用和/或$data的结构中，但我无法弄清楚在哪里。据我所知，该调用看起来与文档中给出的示例完全相同。

以下是在服务器端处理文件内容的方式：

my $self = shift()->openapi()->valid_input() or return;
my $input  = $self->validation()->output();
my $content;
eval {
my $document = $input->{inputFile}->slurp;
$content = $self->textractor()
->process(
$input->{source},
$input->{target},
$document,
_parse_runtime_params($input->{runtimeParams}),
);
};

事实证明，$input->{inputFile}->slurp;的结果是测试的空字符串。但是，在 cURL 调用中，它正确包含文件内容。

Answer 1

如@Boroding所示，解决方案确实是将fileName替换为file：

my $data = {
inputFile => { file => 't/file.txt' },
};
$t->post_ok('/process' => form => $data)->status_is(200);

据推测，文档示例中缺少此功能的原因是测试不应依赖于外部文件。因此，更清洁的方法是：

my $data = {
inputFile => { content => "File content", fileName => 'file.txt' },
};
$t->post_ok('/process' => form => $data)->status_is(200);