Re: 答复: [PerlChina] 一个关于perl获取http code的问题

或者使用requests_redirectable这个option

use LWP;
my $ua = LWP::UserAgent->new(requests_redirectable=>[]);
print $ua->head("http://www.google.cn")->as_string;

在 2010年5月14日 下午3:11，宇捷 <hfahe@163.com>写道：

另外，你得确认跳转是通过后台还是前台方式进行的，js跳转的话，不会得到302，只会是200

 

发件人: perlchina+bnccj674mkndxcn3lpfbboeldvkyw@googlegroups.com [mailto:perlchina+bnccj674mkndxcn3lpfbboeldvkyw@googlegroups.com] 代表 Hejicheng
发送时间: 2010年5月14日 14:31
收件人: perlchina@googlegroups.com
主题: [PerlChina] 一个关于perl获取http code的问题

 

我想得到一个url的http code，调用lwp包中的getprint 和getstore方法，返回的code不准 如: print getstore("http://www.google.cn","123.txt"); 这是一个跳转页面，期望的结果应该是302，可是实际返回的是200。 请问有没有其他包，其他方法能返回正确的值

 

--
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。

--
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。

--
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。