perl - 直接保存到文件并使用 WWW::Mechanize 获取文件名

Question

我通常会使用以下方法保存到文件中:

$mech->save_content($mech->response->filename);

但是由于一些导致“内存不足”的大文件，我必须使用它:

$mech->get( $url, ":content_file"=>$tempfile );

如何使用第二种方法获取文件名，还是必须自己编一个？
我想要在响应对象中返回的文件名: $mech->response->filename .我不想自己编文件名。

Answer 1

:content_file选项 is inherited from LWP::UserAgent并以同样的方式行事。您事先不知道该文件。
您可以执行 HEAD 请求来检查文件名，然后执行 GET 请求。
或者，看看 the lwp-download utility随 LWP::UserAgent 一起提供。它提供了您所需要的。您可以直接使用它，也可以从中取出您想要的东西。可以将 WWW::Mechanize 对象放入此代码中，其行为与 LWP::UserAgent 完全相同。