使用Plack处理多个文件上传

时间:2013-08-10 20:40:58

标签: perl plack

尝试使用Plack处理多个文件上传。

我的表格:

<form id="file_upload" action="savefile" method="POST" enctype="multipart/form-data">
<input type="file" name="file[]" multiple>
<button>upload</button>
</form>

选择了两个文件,名为:x1x2。 :{/ 1>的Data::Dumper结果

my $u = $req->uploads;

$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' );

因此,它只包含第二个文件x2,但在选中文件夹/var/folders/7l/nhyscwy14bjb_sxr_t2gynpm0000gn/T/时,它包含上传的两个文件

问题是如何将两个文件都添加到脚本中,而不是最后一个?

1 个答案:

答案 0 :(得分:11)

for my $upload ($req->upload('file[]')) {
  $upload->filename;
}

您也可以致电@uploads = $req->uploads->get_all('file[]')获取多个值。

有关详细信息,请参阅perldoc Plack::Request(和Hash::MultiValue)。

你在Data :: Dumper中没有看到它们的原因是Hash :: MultiValue使用了一种名为inside-out object的技术来保存给定键的替代值。