如何使用 perl 从服务器响应中打开附件 txt 文件

Question

对不起，如果这个问题看起来很简单，但是我已经搜索了一段时间，还没有找到可以适用于我的情况的答案。

我写了一个小的perl脚本，将文件上传到服务器。此服务器响应：

HTTP/1.1 200 OK

直到我将响应读取为字符串：

print $res->as_string, "n";

我看到服务器似乎已将他的响应附加到文件中：

内容处置：附件;文件名=文件名.txt

如何使用 perl 访问此.txt文件的内容？

Answer 1

HTTP 响应中的 Content-Disposition 标头主要是浏览器将文件保存为名为 filename.txt 的下载的提示。您可以像访问其他每个 HTTP 响应的内容一样访问该文件：

$res->content

或

$res->decoded_content

_{我假设你使用LWP::UserAgent.}