提交表单后如何使用 WWW::Mechanize 下载文件？

我有代码：

#!/usr/bin/perl
use strict;
use WWW::Mechanize;

my $url = 'http://divxsubtitles.net/page_subtitleinformation.php?ID=111292';
my $m = WWW::Mechanize->new(autocheck => 1);
$m->get($url);
$m->form_number(2);
$m->click();
my $response = $m->res();
print $m->response->headers->as_string;

它提交了页面上的下载按钮，但我不确定如何下载 POST 后发回的文件。

如果可能的话，我想要一种使用 wget 下载此文件的方法。我在想它们可能是传递的秘密网址之类的？或者我必须使用 LWP 直接从响应流下载它？

那么如何下载该标头中的文件呢？

Thanks,

科迪·古德曼

提交表格后，您可以使用：

$mech->save_content( $文件名 )

将 $mech->content 的内容转储到 $filename 中。 $文件名将是 被覆盖。如果有任何错误就会死亡。

如果内容类型不以“text/”开头，则内容为 以二进制方式保存。

Source: http://metacpan.org/pod/WWW::机械化