Perl中与PHP的$_FILES用于文件上传相对应的是什么？

Question

Perl中与PHP的$_FILES相当的是什么？我有一些软件将日志文件发送到Web服务器，我需要使用Perl而不是PHP来检索它们。我正在使用CGI.pm。

以下是PHP代码：

<?
    foreach ($_FILES as $key=>$value)
        {
         $uploaded_file = $_FILES[$key]['tmp_name'];
        }
?>

- Dave

Answer 1

这在文档中有说明：

my $q = CGI->new();

# get filehandle like objects from the query. 
my @uploaded_files = $q->upload();

# get file by name
my $fh = $q->upload('uploaded_file'); 

- daotoad

---

我实际上无法让 $q->upload 正常工作 - 我必须明确调用名称，使用 $q->upload('uploaded_file')。不确定为什么会这样。你能否在不知道名称的情况下循环上传的文件？ - Dave

你是否将结果分配给列表上下文，例如数组？my @files = $q->upload(); 或者 (my $file) = $q->upload(); 我已经很久没有使用CGI.pm做任何事情了，我不记得我是否使用了upload的列表上下文版本。 - daotoad

是的，使用我的@files = $q->upload(); - Dave