perl - 如何使用 Catalyst 上传文件？

Question

我正在开发一个基于 Web 的内部应用程序，用于存储和分类照片。我应该如何检索这些文件并将其保存到服务器？

注意：我想将文件保存到文件系统，而不是数据库。
类似于如何处理 HTTP 文件上传？

Answer 1

从您熟悉的 HTML 表单上的上传 INPUT 开始，并确保 HTML 表单标签具有参数enctype="multipart/form-data"

Catalyst::Request对象 ( $c->request) 提供了两种访问和操作文件的方法。

每个文件上传字段都将被实例化为Catalyst::Request::Upload对象。

$c->request->upload将以标量或列表形式返回上传对象。 $c->request->uploads将返回对 Upload 对象哈希的引用。

Upload 对象提供了几种保存和复制文件的方法。

查看我上面链接的手册页。