尝试使用Plack处理多个文件上传.
我的表格:
<form id="file_upload" action="savefile" method="POST" enctype="multipart/form-data">
<input type="file" name="file[]" multiple>
<button>upload</button>
</form>
Run Code Online (Sandbox Code Playgroud)
选择了两个文件,名为:x1和x2.该Data::Dumper结果:
my $u = $req->uploads;
Run Code Online (Sandbox Code Playgroud)
是
$VAR1 = bless( {
'file[]' => bless( {
'headers' => bless( {
'content-disposition' => 'form-data; name="file[]"; filename="x2"',
'content-type' => 'application/octet-stream',
'::std_case' => {
'content-disposition' => 'Content-Disposition'
}
}, 'HTTP::Headers' ),
'filename' => 'x2',
'tempname' => '/var/folders/7l/nhyscwy14bjb_sxr_t2gynpm0000gn/T/7vt04wIrne',
'size' => 146
}, 'Plack::Request::Upload' )
}, 'Hash::MultiValue' );
Run Code Online (Sandbox Code Playgroud)
因此,它只包含第二个文件x2,但在选中时,/var/folders/7l/nhyscwy14bjb_sxr_t2gynpm0000gn/T/它包含上传的两个文件.
问题是如何将两个文件都放到脚本中,而不是最后一个?
miy*_*awa 12
for my $upload ($req->upload('file[]')) {
$upload->filename;
}
Run Code Online (Sandbox Code Playgroud)
您还可以调用@uploads = $req->uploads->get_all('file[]')以获取多个值.
有关详细信息,请参阅perldoc Plack::Request(和Hash::MultiValue).
你在Data :: Dumper中没有看到它们的原因是Hash :: MultiValue使用一种称为inside-out对象的技术来保存给定键的替代值.