为什么可以'；我的Perl脚本不能打印cookie值吗？

当我使用IE访问usatoday.com时，在我的Internet临时文件文件夹中会自动创建cookie文件。但是为什么下面的Perl脚本没有捕获任何东西呢

use WWW::Mechanize;
use strict;
use warnings;

my $browser = WWW::Mechanize->new();
my $response = $browser->get( 'http://www.usatoday.com' );
my $cookie_jar = $browser->cookie_jar(HTTP::Cookies->new()); 
$cookie_jar->extract_cookies( $response );
my $cookie_content = $cookie_jar->as_string;
print $cookie_content;

对于其他一些网站，如amazon.com、google.com和yahoo.com，脚本运行良好，但至少在我看来，usatoday.com也向浏览器发送cookie信息，为什么我会有不同的结果？有什么我遗漏的吗

---

有什么想法吗？谢谢

usatody使用Javascript设置cookie。WWW:：Mechanize不解析或运行Javascript

---

如果需要使用cookie对站点进行爬网，可以分析

http://i.usatoday.net/_common/_scripts/gel/lib/core/core.js

和其他JS文件，并确定如何准确创建cookie，然后自己以编程方式创建一个；使用警告；您将获得编译错误，因为“全局符号“$cookie\u content”需要显式的包名”。将其更正为my$cookie\u content=$cookie\u jar->as\u string；谢谢我明白了。谢谢你的指点。我来看看Win32:：IE:：Mechanzie是否有效。