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

Question

对不起，如果这个问题看起来很简单，但我一直在寻找一段时间，并且没有找到可以应用于我的情况的答案。

我编写了一个将文件上传到服务器的perl脚本。该服务器以：

响应

  

HTTP / 1.1 200确定

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

print $res->as_string, "\n";

我看到服务器似乎将他的回复附加在一个文件中：

  

内容 - 处置：附件;文件名= FILENAME.TXT

如何使用perl获取此.txt文件的内容？

Answer 1

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

$res->content

或

$res->decoded_content

_{我假设您使用LWP::UserAgent。}